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.

A175076 Composites c which end at 2 under iterations of {r mod (max prime p < r)} starting at r = c.

This page as a plain text file.
%I A175076 #6 Feb 09 2015 16:01:34
%S A175076 9,15,21,25,28,33,36,39,45,49,52,55,58,63,66,69,75,78,81,85,88,91,94,
%T A175076 96,99,105,111,115,118,120,122,126,129,133,136,141,144,146,148,153,
%U A175076 156,159,162,165,169,172,175,178,183,186,188,190,195,201,204,206,208,213,216
%N A175076 Composites c which end at 2 under iterations of {r mod (max prime p < r)} starting at r = c.
%C A175076 Subsequence of A175072. Union of a(n) and A175075 is A175072.
%e A175076 Iteration procedure for a(2) = 15: 15 mod 13 = 2. Iteration procedure for a(5) = 28: 28 mod 23 = 5, 5 mod 3 = 2.
%t A175076 ce2Q[n_]:=NestWhileList[Mod[#,NextPrime[#,-1]]&,n,#>0&][[-2]]==2; Select[ Range[ 300],CompositeQ[#]&&ce2Q[#]&] (* _Harvey P. Dale_, Feb 09 2015 *)
%K A175076 nonn
%O A175076 1,1
%A A175076 _Jaroslav Krizek_, Jan 23 2010
%E A175076 More terms from _R. J. Mathar_, Sep 25 2010