# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/

Search: id:a072469
Showing 1-1 of 1

%I A072469 #3 Dec 05 2013 19:55:20
%S A072469 2,3,7,29,61,157,239,521,739,1021,1277,2221,2731,3851,4651,5857,7039,
%T A072469 9343,10831,14561,15919,18481,20563,25321,27551,32371,35803,40993,
%U A072469 44371,53551,55987,66721,72733,80207,87151,97453,101603,116471,123787
%N A072469 Right diagonal of triangle in A072467.
%t A072469 a = {2}; k = 3; Do[i = 1; While[i < n + 1, If[ PrimeQ[k] && Mod[k, n] == 1, a = Append[a, k]; i++ ]; k++ ], {n, 2, 40}]; Table[ a[[n(n - 1)/2 + 1]], {n, 1, 40}]
%Y A072469 Cf. A072467, A072468.
%K A072469 nonn
%O A072469 1,1
%A A072469 _Amarnath Murthy_, Jun 19 2002
%E A072469 Edited by _Robert G. Wilson v_, Jun 28 2002

# Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE