Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A171669
Pell numbers sandwiched between two numbers having same number of divisors.
1
12, 5741, 2744210, 15994428, 21300003689580, 723573111879672, 1111984844349868137938112, 293199986221627877463941823267862, 9960168529794442859224531878561050, 27749033099085295754434173207717704165, 66992092050551637663438906713182313772
OFFSET
1,1
LINKS
MATHEMATICA
f[n_]:=Length[Divisors[n]]; a=1; b=0; c=0; lst={}; Do[c=a+b+c; If[f[c-1]==f[c+1], AppendTo[lst, c]]; a=b; b=c, {n, 80}]; lst
KEYWORD
nonn
AUTHOR
EXTENSIONS
a(8)-a(11) from Amiram Eldar, Aug 08 2024
STATUS
approved