cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A227745 Nonnegative integers whose squares occur in A173318.

This page as a plain text file.
%I A227745 #9 Nov 20 2022 11:14:01
%S A227745 0,1,2,3,12,13,16,17,18,19,20,24,25,28,29,30,32,34,35,39,41,46,48,49,
%T A227745 61,65,72,73,79,85,91,92,93,98,100,104,110,135,136,148,155,156,157,
%U A227745 162,170,177,178,190,195,200,206,207,208,209,213,214,226,228,247,248
%N A227745 Nonnegative integers whose squares occur in A173318.
%H A227745 Antti Karttunen, <a href="/A227745/b227745.txt">Table of n, a(n) for n = 1..937</a>
%F A227745 a(n) = sqrt(A227744(n)).
%t A227745 Select[Sqrt[#]&/@Accumulate[Join[{0},Table[Length[Split[IntegerDigits[n,2]]],{n,10000}]]],IntegerQ] (* _Harvey P. Dale_, Nov 20 2022 *)
%o A227745 (Scheme) (define (A227745 n) (sqrt (A227744 n)))
%Y A227745 Cf. A173318, A227744, A227743.
%K A227745 nonn
%O A227745 1,3
%A A227745 _Antti Karttunen_, Jul 25 2013