OFFSET
0,4
LINKS
Michael De Vlieger, Table of n, a(n) for n = 0..1001
EXAMPLE
110111101 is a term because the string '00110111101' has zeros at the square indices 0,1,4,9 and the first two zeros are dropped.
MATHEMATICA
With[{s = Array[Boole[! IntegerQ@ Sqrt@ #] &, 1002, 0]}, Array[FromDigits[s[[1 ;; #]] ] &, Length@ s]] (* Michael De Vlieger, Mar 23 2020 *)
PROG
(PARI) a(n) = fromdigits(vector(n, i, !issquare(i))); \\ Jinyuan Wang, Mar 22 2020
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Jason Earls, Jun 22 2005
EXTENSIONS
Name changed, several terms inserted, and one more term from Jinyuan Wang, Mar 22 2020
STATUS
approved