Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #4 Jun 11 2015 09:39:18
%S 1,10,11,12,15,16,17,20,21,22,25,28,29,33,34,38,39,42,45,46,47,50,53,
%T 54,55,56,57,58,59,60,63,64,65,68,69,73,74,75,76,77,78,79,82,85,88,89,
%U 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
%N Fixed points in A258742.
%C Numbers n such that A258742(n) = n.
%o (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++)
%Y Cf. A258742, A100208.
%K nonn
%O 1,2
%A _Derek Orr_, Jun 08 2015