|
| |
|
|
A175622
|
|
2^(semiprime(n)-4) mod semiprime(n).
|
|
1
|
|
|
|
1, 4, 5, 4, 2, 8, 11, 14, 2, 10, 17, 30, 23, 24, 20, 6, 8, 26, 13, 29, 22, 8, 2, 35, 28, 30, 72, 2, 54, 44, 8, 47, 12, 78, 40, 56, 48, 74, 93, 7, 46, 62, 65, 8, 84, 71, 18, 50, 2, 128, 33, 20, 80, 100
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,2
|
|
|
LINKS
|
Table of n, a(n) for n=1..54.
|
|
|
MAPLE
|
A175622 := proc(n) local s ; s := A001358(n) ; (2^(s-4)) mod s ; end proc:
seq(A175622(n), n=1..80) ; # R. J. Mathar, Dec 05 2010
|
|
|
MATHEMATICA
|
Mod[2^(#-4), #]&/@Select[Range[200], PrimeOmega[#]==2&] (* From Harvey P. Dale, Oct 28 2011 *)
|
|
|
CROSSREFS
|
Cf. A000079, A001358, A175621.
Sequence in context: A092141 A120867 A011427 * A071413 A161811 A016717
Adjacent sequences: A175619 A175620 A175621 * A175623 A175624 A175625
|
|
|
KEYWORD
|
nonn,less
|
|
|
AUTHOR
|
Juri-Stepan Gerasimov, Dec 04 2010
|
|
|
EXTENSIONS
|
Extended by D. S. McNeil, Dec 04 2010
|
|
|
STATUS
|
approved
|
| |
|
|
