login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A179077 a(n) is the residue ((2^p - 2)/p) mod p, where p is the n-th prime. 1
1, 2, 1, 4, 10, 6, 9, 6, 11, 2, 12, 2, 5, 7, 41, 19, 16, 11, 20, 4, 39, 38, 13, 12, 17, 83, 15, 26, 25, 53, 36, 34, 106, 60, 43, 112, 7, 134, 94, 6, 100, 115, 100, 15, 153, 71, 7, 155, 175, 136, 14, 52, 43, 243, 193, 256, 251, 218, 140, 148, 116, 156, 281, 39, 240, 33, 278 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

a(n) = 0 where n=183 (p=1093) and n=490 (p=3511).

From Felix Fröhlich, Sep 13 2019: (Start)

Conjecture: a(n) is the residue A036968(p-1) (mod p) for p = prime(n).

If the above conjecture is true, then a(n) = 0 if and only if p is a Wieferich prime (A001220) (cf. Hu et al., 2019, section 1.3). (End)

LINKS

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

Su Hu, Min-Soo Kim, Pieter Moree and Min Sha, Irregular primes with respect to Genocchi numbers and Artin's primitive root conjecture, arXiv:1809.08431 [math.NT], 2019; Journal of Number Theory 205 (2019), 59-80, DOI:10.1016/j.jnt.2019.03.012.

MATHEMATICA

aa = {}; Do[AppendTo[aa, Mod[(2^Prime[n] - 2)/Prime[n], Prime[n]]], {n, 1, 100}]; aa

PROG

(PARI) a(n) = my(p=prime(n)); lift(Mod(((2^p-2)/p), p)) \\ Felix Fröhlich, Sep 13 2019

CROSSREFS

Cf. A001220, A036968.

Sequence in context: A220993 A219002 A156919 * A038195 A212770 A205855

Adjacent sequences:  A179074 A179075 A179076 * A179078 A179079 A179080

KEYWORD

nonn

AUTHOR

Artur Jasinski, Jun 28 2010

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 17 21:32 EDT 2019. Contains 328133 sequences. (Running on oeis4.)