OFFSET
1,1
MATHEMATICA
RealDigits[E, 10, 120][[1]]^2 (* Harvey P. Dale, Jan 22 2015 *)
PROG
(Python)
import math
s = "4"
for c in str(math.e * 10 ** 15)[1:-2]:
s = s + ", " + str(int(c) * int(c))
print(s)
CROSSREFS
KEYWORD
nonn,easy,base
AUTHOR
Irving Rivas, Oct 08 2014
EXTENSIONS
More terms from Harvey P. Dale, Jan 22 2015
STATUS
approved