A151820 - OEIS

%I #11 Feb 18 2024 13:21:02

%S 1,144,441,36864,86436,6431296,6964321,15233409,23658496,28536964,

%T 38962564,53319204,62948356,64368529,84529636,94303521,148011556,

%U 429276961,515108416,674129296,2687074569,2751317209,3719170225,4786702596,4877206569,4897760256,5874762609

%N a(n) = A162391(n)^2.

%H Michael S. Branicky, <a href="/A151820/b151820.txt">Table of n, a(n) for n = 1..10000</a> (terms 1..417 from Chai Wah Wu)

%o (Python)

%o from math import isqrt

%o def agen(LIMIT): # generator of terms less than LIMIT

%o     fibs = set()

%o     f, g = 1, 2

%o     while f <= LIMIT:

%o         fibs.add("".join(sorted(str(f))))

%o         f, g = g, f+g

%o         r = s = 1

%o     r = s = 1

%o     while s <= LIMIT:

%o         if "".join(sorted(str(s))) in fibs: yield s

%o         r += 1

%o         s = r*r

%o print(list(agen(10**10))) # _Michael S. Branicky_, Feb 18 2024

%Y Cf. A162391.

%K nonn

%O 1,2

%A _Claudio Meller_, Jul 02 2009

%E More terms from _Chai Wah Wu_, Dec 22 2016