# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a075381 Showing 1-1 of 1 %I A075381 #17 Jan 07 2024 22:09:49 %S A075381 1,4,14,26,34,41,51,64,71,77,87,90,93,111,115,123,132,134,141,144,146, %T A075381 149,159,162,165,168,171,173,177,180,190,197,219,223,231,240,242,258, %U A075381 260,265,266,273,276,278,287,290,293,305,317,330,332,348,350,365,371 %N A075381 Fixed points of A075380. %C A075381 A075380(a(n))=a(n); A167901(a(n))=a(n); A167902(a(n))=a(n). [_Reinhard Zumkeller_, Nov 15 2009] %H A075381 Scott R. Shannon, Table of n, a(n) for n = 1..10000 %o A075381 (PARI) print1(1, ", "); v=[1]; n=1; while(n<10^3, 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 %Y A075381 Cf. A075380. %K A075381 nonn %O A075381 1,2 %A A075381 _Amarnath Murthy_, Sep 22 2002 %E A075381 More terms from _David Wasserman_, Jan 17 2005 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE