1,7

Table of n, a(n) for n=1..75.

a(n)=A001248(n) mod A000027(n).

f[n_] := Mod[Prime@ n^2, n]; Array[f, 75]

Cf. A000027, A001248.

Sequence in context: A010254 A178618 A155992 * A305564 A160417 A117044

Adjacent sequences: A178208 A178209 A178210 * A178212 A178213 A178214

nonn

Juri-Stepan Gerasimov, Dec 19 2010

approved