login
A181730
Fixed points in A100208.
4
1, 2, 3, 5, 25, 33, 41, 60, 61, 64, 66, 72, 88, 129, 203, 212, 299, 313, 330, 380, 419, 442, 463, 480, 487, 517, 533, 560, 589, 603, 607, 633, 646, 649, 657, 658, 689, 703, 759, 776, 782, 791, 807, 814, 843, 853, 874, 907, 922, 953, 1034, 1075, 1127, 1140, 1143, 1149, 1156, 1232, 1237, 1243, 1270, 1288, 1339, 1341, 1395, 1409, 1518, 1525
OFFSET
1,2
COMMENTS
Numbers n with property that A100208(n)=n.
There are 677 fixed points among first 20000 terms of A100208.
PROG
(PARI) print1(1, ", "); v=[1]; k=1; while(#v<=10^3, if(isprime(k^2+v[#v]^2)&&!vecsearch(vecsort(v), k), v=concat(v, k); if(k==#v, print1(k, ", ")); k=0); k++); \\ Derek Orr, Jun 08 2015
CROSSREFS
Cf. A100208.
Sequence in context: A279864 A324289 A280258 * A024774 A068543 A064026
KEYWORD
nonn
AUTHOR
Zak Seidov, Nov 16 2010
STATUS
approved