cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Previous Showing 11-20 of 32 results. Next

A114670 Primes with 54 as smallest positive primitive root.

Original entry on oeis.org

4348468741, 5646352141, 8962988581, 9038426461, 11609988391, 11817434581, 12350678341, 13012156741, 14241302461, 15487852381, 15511469821, 15833904661, 16476019141, 16627692511, 18075106141, 18896377501, 19490407861, 21539102341, 21757138261, 24953494861
Offset: 1

Views

Author

Robert G. Wilson v, Dec 21 2005

Keywords

Links

Crossrefs

Cf. A001122-A001126, A061323-A061335, A061730-A061741, A114657-A114686.

Programs

  • Mathematica
    (* first load *) << NumberTheory`NumberTheoryFunctions` (* then *) t = {}; Do[ If[ PrimitiveRoot[ Prime@n] == 54, AppendTo[t, n]; Print@Prime@n], {n, 110223179}]; Prime@t

Extensions

a(2)-a(5) from Tomás Oliveira e Silva (tos(AT)det.ua.pt) and Ray Chandler, Jan 05 2006
a(6)-a(20) from Robert Price, Nov 25 2023

A114671 Primes with 55 as smallest positive primitive root.

Original entry on oeis.org

459841, 762049, 971401, 1200361, 3148681, 4672201, 5774833, 6336409, 7190137, 8209489, 11393929, 11922121, 14528929, 15322441, 16280161, 16923817, 18440159, 21301081, 23834521, 25341289, 25977001, 26494441, 28458361, 28632311, 29196241, 29334793, 30009121
Offset: 1

Views

Author

Robert G. Wilson v, Dec 21 2005

Keywords

Links

Crossrefs

Cf. A001122-A001126, A061323-A061335, A061730-A061741, A114657-A114686.

Programs

  • Mathematica
    (* first load *) << NumberTheory`NumberTheoryFunctions` (* then *) Select[ Prime@Range@1812000, PrimitiveRoot@# == 55 &]

Extensions

a(25)-a(27) from Robert Price, Nov 20 2023

A114658 Primes with 41 as smallest positive primitive root.

Original entry on oeis.org

156601, 185641, 266137, 284231, 375311, 494471, 504001, 510551, 544631, 552241, 583969, 589681, 622561, 637729, 643129, 651913, 683041, 683231, 701399, 738211, 742681, 757201, 811561, 819001, 819719, 832129, 840841, 858841, 872041, 878641, 880871, 887401
Offset: 1

Views

Author

Robert G. Wilson v, Dec 21 2005

Keywords

Links

Crossrefs

Cf. A001122-A001126, A061323-A061335, A061730-A061741, A114657-A114686.

Programs

  • Mathematica
    (* first load *) << NumberTheory`NumberTheoryFunctions` (* then *) Select[ Prime@Range@69800, PrimitiveRoot@# == 41 &]

Extensions

a(31)-a(32) from Robert Price, Nov 18 2023

A114661 Primes with 44 as smallest positive primitive root.

Original entry on oeis.org

71761, 346441, 380881, 1613641, 2842291, 3782521, 3878401, 5355841, 5393761, 5585161, 6199321, 8596561, 9800281, 11403961, 12205321, 13011121, 14437081, 14672341, 14844001, 16254019, 16331641, 16350721, 16523641, 19611481, 20507761, 20749681, 21456481
Offset: 1

Views

Author

Robert G. Wilson v, Dec 21 2005

Keywords

Links

Crossrefs

Cf. A001122-A001126, A061323-A061335, A061730-A061741, A114657-A114686.

Programs

  • Mathematica
    (* first load *) << NumberTheory`NumberTheoryFunctions` (* then *) Select[ Prime@Range@1310000, PrimitiveRoot@# == 44 &]
Select[Prime[Range[1250000]],PrimitiveRoot[#]==44&] (* PrimitiveRoot is now part of Mathematica's core language so there is no longer any need to load NumberTheoryFunctions first *) (* Harvey P. Dale, May 16 2016 *)

Extensions

a(25)-a(27) from Robert Price, Nov 19 2023

A114665 Primes with 48 as smallest positive primitive root.

Original entry on oeis.org

823766851, 1203424471, 1647646771, 2539428211, 4100784871, 4492676371, 5183970931, 6326736151, 6330402751, 8251729531, 8735517211, 10570534171, 11212271071, 12478723111, 13609280431, 16631896051, 18781331911, 18884910871, 20211833071, 20568043471, 20572400551
Offset: 1

Views

Author

Robert G. Wilson v, Dec 21 2005

Keywords

Links

Crossrefs

Cf. A001122-A001126, A061323-A061335, A061730-A061741, A114657-A114686.

Programs

  • Mathematica
    t = {}; Do[ If[ PrimitiveRoot[ Prime@n] == 48, AppendTo[t, n]; Print@Prime@n], {n, 235000000}]; Prime@t
  • PARI
    is(k) = isprime(k) && znprimroot(k)==48; \\ Jinyuan Wang, Apr 09 2025

Extensions

a(7)-a(13) from Ray Chandler, Jan 13 2006
a(14)-a(21) from Robert Price, Nov 25 2023

A114666 Primes with 50 as smallest positive primitive root.

Original entry on oeis.org

23126821, 335139421, 427990531, 709267021, 738459541, 809484061, 1016774221, 1075376821, 1122243739, 1492684411, 1557748501, 1744951261, 2726543821, 2772069301, 3146962261, 3267684421, 3395830621, 3691544011, 3705614221, 3873482341, 4315462621, 4959079861
Offset: 1

Views

Author

Robert G. Wilson v, Dec 21 2005

Keywords

Links

Crossrefs

Cf. A001122-A001126, A061323-A061335, A061730-A061741, A114657-A114686.

Programs

  • Mathematica
    (* first load *) << NumberTheory`NumberTheoryFunctions` (* then *) t = {}; Do[ If[ PrimitiveRoot[ Prime@n] == 50, AppendTo[t, n]; Print@Prime@n], {n, 235000000}]; Prime@t

Extensions

a(20)-a(22) from Robert Price, Nov 25 2023

A114667 Primes with 51 as smallest positive primitive root.

Original entry on oeis.org

322999, 1302841, 3138071, 3795289, 5062711, 5334911, 5352649, 5579641, 5780329, 6202681, 6329231, 6357121, 7014121, 7156231, 7179481, 7184857, 8334481, 8340721, 8798431, 9355921, 9895201, 10136449, 10750489, 11660791, 11729041, 11924929, 12444721, 12787321
Offset: 1

Views

Author

Robert G. Wilson v, Dec 21 2005

Keywords

Links

Crossrefs

Cf. A001122-A001126, A061323-A061335, A061730-A061741, A114657-A114686.

Programs

  • Mathematica
    (* first load *) << NumberTheory`NumberTheoryFunctions` (* then *) Select[ Prime@Range@790000, PrimitiveRoot@# == 51 &]

Extensions

a(26)-a(28) from Robert Price, Nov 20 2023

A114668 Primes with 52 as smallest positive primitive root.

Original entry on oeis.org

129361, 632041, 3078769, 4453681, 4620961, 4677121, 6633001, 7626481, 8318641, 9471841, 9746521, 14249929, 16073401, 16243921, 17396569, 17793241, 18696241, 18833641, 19245601, 20159329, 20390329, 24551521, 24638881, 24763369, 25796401, 36403921, 36533281
Offset: 1

Views

Author

Robert G. Wilson v, Dec 21 2005

Keywords

Links

Crossrefs

Cf. A001122-A001126, A061323-A061335, A061730-A061741, A114657-A114686.

Programs

  • Mathematica
    (* first load *) << NumberTheory`NumberTheoryFunctions` (* then *) Select[ Prime@Range@1620000, PrimitiveRoot@# == 52 &]

Extensions

a(25)-a(27) from Robert Price, Nov 20 2023

A114672 Primes with 56 as smallest positive primitive root.

Original entry on oeis.org

219605251, 293268301, 370049371, 383483101, 451428301, 533723371, 560941021, 677810041, 722238661, 734682901, 734901421, 826629421, 844272001, 886323091, 936056221, 1117983421, 1121000761, 1137522541, 1163531461, 1178675821, 1239072481, 1246249621
Offset: 1

Views

Author

Robert G. Wilson v, Dec 21 2005

Keywords

Links

Crossrefs

Cf. A001122-A001126, A061323-A061335, A061730-A061741, A114657-A114686.

Programs

  • Mathematica
    (* first load *) << NumberTheory`NumberTheoryFunctions` (* then *) Select[ Prime@Range@59500000, PrimitiveRoot@# == 56 &]

Extensions

a(21)-a(22) from Robert Price, Nov 25 2023

A114673 Primes with 57 as smallest positive primitive root.

Original entry on oeis.org

471769, 1380289, 1854889, 2605849, 2754049, 3900121, 3903769, 6324847, 6966961, 7244449, 8574721, 8679841, 8912401, 9470161, 10448881, 11183041, 13313161, 13383841, 13577041, 13983841, 15132121, 15792001, 16238401, 16639681, 17610961, 17785951, 18367561
Offset: 1

Views

Author

Robert G. Wilson v, Dec 21 2005

Keywords

Links

Crossrefs

Cf. A001122-A001126, A061323-A061335, A061730-A061741, A114657-A114686.

Programs

  • Mathematica
    (* first load *) << NumberTheory`NumberTheoryFunctions` (* then *) Select[ Prime@Range@1130000, PrimitiveRoot@# == 57 &]

Extensions

a(25)-a(27) from Robert Price, Nov 20 2023
Previous Showing 11-20 of 32 results. Next

Started in 1964 by Neil J. A. Sloane | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement.