A114011 Least multiple of prime(n) ending in digit 1.
21, 11, 91, 51, 171, 161, 261, 31, 111, 41, 301, 141, 371, 531, 61, 201, 71, 511, 711, 581, 801, 291, 101, 721, 321, 981, 791, 381, 131, 411, 1251, 1341, 151, 471, 1141, 501, 1211, 1611, 181, 191, 1351, 591, 1791, 211, 1561, 681, 2061, 1631, 2151, 241, 251
Offset: 4
Examples
a(9) = 161 == 0 (mod prime(9)=23).
Crossrefs
Cf. A114012.
Programs
-
Mathematica
f[n_] := Block[{k = 1, p = Prime[n]}, While[Mod[k*p, 10] != 1, k++ ]; k*p]; Table[ f[n], {n, 4, 54}] (* Robert G. Wilson v *)
Extensions
More terms from Robert G. Wilson v, Nov 17 2005