login
A214882
A007185(n)/5^n.
4
1, 1, 5, 1, 29, 57, 37, 33, 109, 841, 373, 3761, 8125, 9817, 8517, 41025, 73741, 67177, 118293, 967377, 822621, 3100537, 6492133, 16397921, 33478573, 13406601, 83211957, 177703665, 35540733, 114482329, 881889925, 176377985, 35275597, 15468937385, 3093787477
OFFSET
1,3
COMMENTS
Conjecture: For any odd m and for any k, the density of n such that a(n) == k (mod m) is 1/m.
PROG
(GAP) A214882 := function(max) local result, i; result := [5]; for i in [2..max] do Add(result, result[i-1]^2 mod 10^i); od; result := List([1..max], n->result[n]/5^n); return result; end;
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Eric M. Schmidt, Jul 31 2012
STATUS
approved