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.

A082510 Differences of consecutive primes being divisible by 6 in order of their appearance in A001223: terms not divisible by 6 are omitted from A001223.

This page as a plain text file.
%I A082510 #10 May 13 2020 17:24:18
%S A082510 6,6,6,6,6,6,6,6,6,6,6,6,12,12,6,6,6,6,6,6,6,6,6,6,6,6,12,6,12,18,6,6,
%T A082510 6,6,6,6,6,6,12,6,6,12,6,6,6,6,12,6,6,6,6,6,12,6,6,6,18,6,6,6,6,6,6,
%U A082510 12,6,6,6,12,18,6,6,12,6,6,6,18,6,6,12,6,12,12,12,6,6,6,6,6,6,24,12,6,6,6,18
%N A082510 Differences of consecutive primes being divisible by 6 in order of their appearance in A001223: terms not divisible by 6 are omitted from A001223.
%t A082510 Do[s=Mod[d=Prime[n+1]-Prime[n], 6]; If[Equal[s, 0], Print[d]], {n, 1, 1000}]
%t A082510 Select[Last[#]-First[#]&/@Partition[Prime[Range[500]],2,1], Divisible[ #,6]&] (* _Harvey P. Dale_, Mar 18 2012 *)
%t A082510 Select[Differences[Prime[Range[500]]],Divisible[#,6]&] (* _Harvey P. Dale_, May 13 2020 *)
%Y A082510 Cf. A001223, A082508, A082509.
%K A082510 nonn
%O A082510 1,1
%A A082510 _Labos Elemer_, Apr 28 2003