A255646 Odd triprimes modulo 10.
7, 5, 3, 5, 9, 5, 7, 5, 7, 3, 5, 1, 5, 5, 7, 1, 5, 5, 1, 3, 5, 9, 5, 5, 3, 3, 5, 7, 3, 9, 5, 7, 9, 3, 5, 9, 5, 5, 5, 5, 7, 3, 7, 1, 9, 9, 5, 1, 5, 5, 3, 5, 9, 5, 7, 7, 9, 5, 1, 7, 3, 5, 5, 1, 5, 5, 1, 7, 9, 5, 7, 5, 1, 5, 3, 5, 7, 1, 7, 3, 5, 7, 3, 9, 5, 5
Offset: 1
Keywords
Links
Programs
-
Haskell
a255646 = flip mod 10 . a046316
-
PARI
do(x)=my(v=List(), t); forprime(p=3, x\9, forprime(q=3, min(x\(3*p), p), t=p*q; forprime(r=3, min(x\t, q), listput(v, t*r)))); Set(v)%10 \\
Comments