%I M3408 N1378 #29 Sep 08 2022 08:44:30
%S 1,4,11,20,31,44,61,100,121,144,171,220,251,304,341,400,441,504,551,
%T 620,671,744,1021,1100,1161,1244,1331,1420,1511,1604,1701,2000,2101,
%U 2204,2311,2420,2531,2644,2761,3100,3221,3344,3471,3620,3751,4104,4241
%N Squares written in base 8.
%D N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
%D N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
%D V. Thébault, Les Récréations Mathématiques. Gauthier-Villars, Paris, 1952, p. 95.
%F a(n) = A007094(A000290(n)). - _Jason Kimberley_, Dec 13 2012
%t Table[BaseForm[n^2,8],{n,5!}] (* _Vladimir Joseph Stephan Orlovsky_, May 12 2010 *)
%t Table[FromDigits[IntegerDigits[n^2, 8]], {n, 60}] (* _Vincenzo Librandi_, Oct 15 2015 *)
%o (Magma) [Seqint(Intseq(n^2, 8)): n in [1..60]]; // _Vincenzo Librandi_, Oct 16 2015
%o (PARI) a(n)=fromdigits(digits(n^2,8)) \\ _Charles R Greathouse IV_, Apr 25 2016
%Y Cf. A000290, A007094.
%K nonn,easy,base
%O 1,2
%A _N. J. A. Sloane_
%E More terms from _James A. Sellers_, Sep 08 2000
|