|
%I #6 Jun 11 2015 09:39:06
%S 1,4,6,9,12,13,14,18,21,24,25,26,29,33,36,39,42,43,44,47,48,51,54,57,
%T 58,59,60,61,62,63,66,67,68,72,73,74,78,81,84,85,86,89,93,94,95,99,
%U 102,103,104,105,108,109,110,111,114,117,118,119,123,124,125,128,131,134,138,141,144,145,146,149,150,151,152,153
%N Fixed points in A055266.
%C Numbers n such that A055266(n) = n.
%o (PARI) v=[0]; k=1; while(#v<=10^3, if(!isprime(k+v[#v])&&!vecsearch(vecsort(v), k), v=concat(v, k); if(k==#v-1,print1(k,", ")); k=0); k++);
%Y Cf. A100208, A181730.
%K nonn
%O 1,2
%A _Derek Orr_, Jun 08 2015
|
