This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A117925 #14 May 24 2024 15:22:35 %S A117925 1,2,3,4,6,8,9,10,14,18,19,21,23,24,28,33,35,42,50,56,57,62,68,81,82, %T A117925 111,116,120,137,143,149,156,159,166,168,169,173,186,200,201,204,206, %U A117925 212,218,226,234,237,253,263,266,269,273,274,277,282,284,285,286,288 %N A117925 Fixed points of A055265, A117922, A117923 and A117924. %C A117925 a(n) = A055265(a(n)) = A117922(a(n)) = A117923(a(n)) = A117924(a(n)). %H A117925 T. D. Noe, <a href="/A117925/b117925.txt">Table of n, a(n) for n = 1..1000</a> %o A117925 (PARI) a(n)=v=[1];k=1;while(#v<=n,if(isprime(k+v[#v])&&!vecsearch(vecsort(v),k),v=concat(v,k);k=0);k++);v[#v-1] %o A117925 n=1;while(n<1000,if(a(n)==n,print1(n,", "));n++) \\ _Derek Orr_, Jun 08 2015 %Y A117925 Cf. A055265, A117922, A117923, A117924. %K A117925 nonn %O A117925 1,2 %A A117925 _Reinhard Zumkeller_, Apr 03 2006