A067947 -id:A067947 - cp's OEIS frontend

A115976 Numbers k that divide 2^(k-2) + 1.

1, 3, 49737, 717027, 9723611, 21335267, 32390921, 38999627, 43091897, 86071337, 101848553, 102361457, 228911411, 302948067, 370219467, 393664027, 455781089, 483464027, 1040406177, 1272206987, 2371678553, 2571052241, 2648052857, 3054713937, 3597613307, 3782971499, 3917903851, 4005163577, 5419912241

Offset: 1

Max Alekseyev, Mar 15 2006

nonn

Some larger terms: 4465786944074559659, 1440261542571735083956640176981881665928575750093930787551969

Max Alekseyev, Table of n, a(n) for n = 1..708 (contains all terms below 10^15)

The odd elements of A244673.

Cf. A006521, A006517, A069927, A067945, A067946, A067947, A068382, A068383, A014945, A014946, A014949, A092028.

lst = {}; Do[ If[ PowerMod[2, 2n - 3, 2n - 1] == 2n - 2, AppendTo[lst, 2n - 1]], {n, 10^9}]; lst (* Robert G. Wilson v, Apr 04 2006 *)

More terms from Robert G. Wilson v, Apr 04 2006
Terms a(24) onward from Max Alekseyev, Feb 03 2015
b-file corrected and extended by Max Alekseyev, Oct 27 2018

A277371 Positive integers k that divide 7^k + 3.

Original entry on oeis.org

1, 2, 4, 5, 26, 205, 2404, 88171, 1785134, 2010899, 58796834, 639723359, 657788549, 2050134685, 4809019972, 6114530474, 11931055777, 1292089439947, 1294667166242, 4586221808305

Offset: 1

Seiichi Manyama, Oct 11 2016

No other terms below 10^15. Some larger terms: 68363072121992414, 95409505835353571, 1579273736555455916822694118995172, 5481414795965035698701145369881812, 14905708205837180834697194210878924, 45415365018055454586462673640490785681840279, 147329898999183698422689397719859437775766016038732177717811807964. - Max Alekseyev, Oct 18 2016

			7^5 + 3 = 16810 = 5 * 3362, so 5 is a term.

Cf. A066438.

Cf. Solutions to 7^n == k (mod n): this sequence (k=-3), A277370 (k=-2), A015954 (k=-1), A067947 (k=1), A277401 (k=2), A277554 (k=3).

Select[Range[10000], Divisible[7^# + 3, #] &] (* Alonso del Arte, Oct 11 2016 *)
Join[{1,2},Select[Range[21*10^5],PowerMod[7,#,#]==#-3&]] (* The program generates the first 10 terms of the sequence. *) (* Harvey P. Dale, Sep 21 2022 *)

is(n) = Mod(7, n)^n==-3 \\ Felix Fröhlich, Oct 14 2016

A066438(a(n)) = a(n) - 3 for n > 2.

a(15)-a(20) from Max Alekseyev, Oct 18 2016

cp's OEIS Frontend

A115976 Numbers k that divide 2^(k-2) + 1.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Mathematica

Extensions