OFFSET
0,1
COMMENTS
Alternative definition: a(n) = number of k such that A000224(k) = k - n.
LINKS
T. D. Noe, Table of n, a(n) for n = 0..10000
EXAMPLE
MAPLE
A218578 := proc(n)
local f;
f := 0 ;
for q from 1 to 2*n+2 do
if A095972(q) = n then
f := f+1 ;
end if;
end do:
f ;
end proc: # R. J. Mathar, Nov 05 2012
MATHEMATICA
nn = 100; t = Table[Length[Complement[Range[n-1], Union[Mod[Range[n]^2, n]]]], {n, 2*nn + 2}]; Table[Count[t, n], {n, 0, nn}] (* T. D. Noe, Nov 06 2012 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Dmitri Kamenetsky, Nov 03 2012
STATUS
approved