cp's OEIS Frontend

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.

A175088 Numbers m with result 1 under iterations of {r mod (max prime p <= r)} starting at r = m.

This page as a plain text file.
%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