A167906 - OEIS

%I #12 Jan 07 2024 22:09:40

%S 1,2,3,4,14,17,18,19,20,21,22,35,36,37,42,44,45,46,47,48,49,63,64,65,

%T 66,67,86,89,90,91,92,93,94,107,108,109,110,111,112,123,132,134,135,

%U 136,137,146,148,161,162,168,170,171,179,180,185,186,187,189,191,192,193

%N Fixed points of permutations A121878, A167904, A167905.

%C A121878(a(n))=a(n); A167904(a(n))=a(n); A167905(a(n))=a(n).

%H Scott R. Shannon, <a href="/A167906/b167906.txt">Table of n, a(n) for n = 1..10000</a>

%o (PARI) print1(1,", ");v=[1]; n=1; while(n<100, if(issquarefree(n+v[#v])&&!vecsearch(vecsort(v), n), v=concat(v, n);if(n==#v,print1(n,", ")); n=0); n++) \\ _Derek Orr_, Jun 09 2015

%K nonn

%O 1,2

%A _Reinhard Zumkeller_, Nov 15 2009