%I A129750
%S A129750 1,2,2,6,2,4,2,6,6,8,6,6,2,4,4,6,8,6,6,2,6,6,6,2,6,2,4,2,6,4,6,6,2,0,8,
%T A129750 6,4,4,4,6,8,0,2,4,2,8,2,4,2,6,6,8,0,6,4,6,8,6,6,2,0,4,6,2,4,6,6,0,2,6,
%U A129750 6,2,4,6,6,6,2,6,8,0,8,0,2,6,6,6,2,6,2,4,2,2,6,8,6,6,8,2,2,6,0,4,6,8,6
%N A129750 Absolute difference of final digits of consecutive primes.
%t A129750 f[n_] := Abs[Mod[Prime[n + 1], 10] - Mod[Prime[n], 10]]; Array[f, 105] 
               (*Chandler*)
%Y A129750 Sequence in context: A134339 A162299 A110141 this_sequence A068976 A124859 
               A021446
%Y A129750 Adjacent sequences: A129747 A129748 A129749 this_sequence A129751 A129752 
               A129753
%K A129750 base,easy,nonn
%O A129750 1,2
%A A129750 Giovanni Teofilatto (g.teofilatto(AT)tiscalinet.it), Jun 02 2007
%E A129750 Corrected and extended by Ray Chandler (rayjchandler(AT)sbcglobal.net), 
               Jun 12 2007