A258744 Fixed points in A258742.

1, 10, 11, 12, 15, 16, 17, 20, 21, 22, 25, 28, 29, 33, 34, 38, 39, 42, 45, 46, 47, 50, 53, 54, 55, 56, 57, 58, 59, 60, 63, 64, 65, 68, 69, 73, 74, 75, 76, 77, 78, 79, 82, 85, 88, 89, 90, 93, 94, 95, 96, 97, 100, 103, 104, 107, 108, 109, 113, 114, 115, 118, 119, 120, 121, 122, 125, 126, 127, 128, 129, 130, 133, 134

Offset

1,2

Comments

Numbers n such that A258742(n) = n.

Links

Table of n, a(n) for n=1..74.

Prog

(PARI) print1(1, ", "); v=[1]; k=1; while(#v<=200, if(!isprime(k^2+v[#v]^2)&&!vecsearch(vecsort(v), k), v=concat(v, k); if(k==#v, print1(k, ", ")); k=0); k++)

Crossrefs

Cf. A258742, A100208.

Sequence in context: A046431 A108697 A109279 * A219251 A154770 A320601

Adjacent sequences: A258741 A258742 A258743 * A258745 A258746 A258747

Keyword

nonn

Author

Derek Orr, Jun 08 2015

Status

approved