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 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