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 A175088 #23 Aug 04 2018 06:39:29 %S A175088 1,4,6,8,12,14,18,20,24,27,30,32,35,38,42,44,48,51,54,57,60,62,65,68, %T A175088 72,74,77,80,84,87,90,93,95,98,102,104,108,110,114,117,119,121,125, %U A175088 128,132,135,138,140,143,145,147,150,152,155,158,161,164,168,171 %N A175088 Numbers m with result 1 under iterations of {r mod (max prime p <= r)} starting at r = m. %C A175088 Terms are composites for all n >= 2. %C A175088 Complement of A175089. [_Jaroslav Krizek_, Feb 05 2010] %C A175088 Numbers m such that A121559(m) = 1. - _Michel Marcus_, Aug 22 2014 %e A175088 Iteration procedure for a(6) = 14: 14 mod 13 = 1. %e A175088 Iteration procedure for a(10) = 27: 27 mod 23 = 4, 4 mod 3 = 1. %t A175088 (x /. Solve[Fold[Mod[#1, #2] &, x, Reverse[Prime /@ Range[40]]] == 1, %t A175088 x, Integers]) /. C[1] -> 0 (* _Morgan L. Owens_, Jun 22 2016 *) %Y A175088 Cf. A007917 and A064722 (both for the iterations). %K A175088 nonn %O A175088 1,2 %A A175088 _Jaroslav Krizek_, Jan 28 2010 %E A175088 More terms from _Michel Marcus_, Aug 22 2014