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.

A080672 Numbers having divisors 2 or 3 or 5 or 7.

This page as a plain text file.
%I A080672 #21 Apr 03 2024 14:43:42
%S A080672 2,3,4,5,6,7,8,9,10,12,14,15,16,18,20,21,22,24,25,26,27,28,30,32,33,
%T A080672 34,35,36,38,39,40,42,44,45,46,48,49,50,51,52,54,55,56,57,58,60,62,63,
%U A080672 64,65,66,68,69,70,72,74,75,76,77,78,80,81,82,84,85,86,87,88,90,91,92,93
%N A080672 Numbers having divisors 2 or 3 or 5 or 7.
%C A080672 A020639(a(n)) <= 7; A210679(a(n)) > 0. - _Reinhard Zumkeller_, Apr 02 2012
%H A080672 Reinhard Zumkeller, <a href="/A080672/b080672.txt">Table of n, a(n) for n = 1..10000</a>
%H A080672 <a href="/index/Rec#order_162">Index entries for linear recurrences with constant coefficients</a>, order 162.
%F A080672 From _Charles R Greathouse IV_, Sep 14 2015: (Start)
%F A080672 a(n) = 35n/27 + O(1).
%F A080672 For n > 162, a(n) = a(n-162) + 210. [Corrected by _Peter Munn_, Apr 22 2021]
%F A080672 (End)
%F A080672 For n < 162, a(n) = 210 - a(162-n). - _Peter Munn_, Apr 22 2021
%t A080672 Select[Range[100],Length[Intersection[Divisors[#],{2,3,5,7}]]>0&] (* _Harvey P. Dale_, Apr 03 2024 *)
%o A080672 (PARI) div2357(n)= for(x=1,n, if(gcd(x,210)<>1,print1(x" ")) )
%o A080672 (PARI) is(n)=gcd(n,210)>1 \\ _Charles R Greathouse IV_, Sep 14 2015
%o A080672 (Haskell)
%o A080672 a080672 n = a080672_list !! (n-1)
%o A080672 a080672_list = filter ((<= 7) . a020639) [2..]
%o A080672 -- _Reinhard Zumkeller_, Apr 02 2012
%Y A080672 Cf. A020639, A008364 (complement).
%Y A080672 Subsequences: A002473, A343597.
%K A080672 easy,nonn
%O A080672 1,1
%A A080672 _Cino Hilliard_, Mar 02 2003
%E A080672 Offset fixed by _Reinhard Zumkeller_, Apr 02 2012