[go: up one dir, main page]

login
A186524
Numbers n such that n == prime(n) (mod 7).
0
6, 9, 13, 17, 34, 40, 48, 51, 62, 72, 73, 79, 80, 86, 100, 102, 109, 113, 116, 120, 134, 139, 142, 146, 162, 165, 169, 180, 183, 194, 198, 202, 206, 219, 228, 229, 239, 248, 249, 255, 267, 270, 271, 285, 288, 291, 295, 299, 300, 310, 312, 330, 331
OFFSET
1,1
EXAMPLE
6 and 13, the 6th prime, are equal (mod 7).
MATHEMATICA
Select[Range[1000], Mod[#, 7] == Mod[Prime[#], 7]&]
CROSSREFS
Sequence in context: A030499 A181428 A171575 * A315963 A315964 A315965
KEYWORD
nonn
AUTHOR
Zak Seidov, Feb 23 2011
STATUS
approved