login
A073604
Smallest multiple of (n+1)-st prime which is == 1 mod n-th prime.
0
3, 10, 21, 22, 78, 170, 171, 115, 116, 465, 962, 1148, 903, 517, 424, 531, 1830, 3417, 1207, 2628, 4819, 1660, 1246, 7566, 7373, 5253, 2782, 5886, 9266, 13335, 4192, 3014, 9591, 2086, 11325, 19782, 21353, 6847, 4844, 5191, 16290, 31133, 18528
OFFSET
1,1
EXAMPLE
a(5) = 78 which is 6*13 and 78 ==1 (mod 11).
MATHEMATICA
f[n_] := Block[{k = 1, p = Prime[n], q = Prime[n + 1]}, While[ Mod[k*q, p] != 1, k++ ]; k*q]; Table[f[n], {n, 1, 45}]
CROSSREFS
Sequence in context: A306813 A092305 A196166 * A370032 A210990 A004194
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Aug 04 2002
EXTENSIONS
Edited by Robert G. Wilson v, Aug 05 2002
STATUS
approved