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 A232882 #19 Aug 26 2017 07:55:45
%S A232882 17,19,71,73,107,109,179,181,197,199,269,271,431,433,521,523,809,811,
%T A232882 827,829,881,883,1061,1063,1151,1153,1277,1279,1619,1621,1871,1873,
%U A232882 1997,1999,2087,2089,2141,2143,2267,2269,2339,2341,2591,2593,2789,2791,2969
%N A232882 Twin primes with digital root 8 or 1.
%C A232882 All twin primes except (3,5) have one of 3 digital root pairings: {2,4}, {5,7} or {8,1}: see A232880 for {2,4} and A232881 for {5,7}.
%C A232882 Twin primes of the form 9n +- 1. [_Bruno Berselli_, Aug 26 2014]
%e A232882 17 and 19 are in the sequence because they form a twin prime pair in which 17 has a digital root of 8 and 19 has one of 1. Likewise 71 and 73 form a twin prime pair where 71 has 8 for a digital root and 73 has 1.
%t A232882 dRoot[n_] := 1 + Mod[n - 1, 9]; tw = Select[Prime[Range[1000]], PrimeQ[# + 2] &]; Select[Union[tw, tw + 2], MemberQ[{1, 8}, dRoot[#]] &] (* _T. D. Noe_, Dec 10 2013 *)
%Y A232882 Cf. A001097, A077800, A232880, A232881.
%K A232882 nonn,base
%O A232882 1,1
%A A232882 _Gary Croft_, Dec 01 2013