The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A242113 a(n) = number of primes of the form k^n - m^k where k > m > 0. 1
 0, 1, 2, 6, 7, 2, 14, 7, 11, 10, 33, 10, 42, 35, 47, 39, 122, 22, 248, 113, 247, 236, 751, 75, 1268, 812, 1422, 1531, 4543, 87, 8669, 5750, 8884, 10983, 29084, 2274, 58841, 41242, 58030, 74646, 216647, 11656, 419147, 313237, 364925, 617742, 1576642, 75542, 3071839, 2299620 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,3 COMMENTS It would be good to have a proof that a(n) is always finite. - N. J. A. Sloane, Sep 06 2014 LINKS FORMULA a(n) >= A245459(n). EXAMPLE a(2) = 1 because  2^2 - 1^2 = 3 is prime; a(3) = 2 because  2^3 - 1^2 = 7 is prime and 3^3 - 2^3 = 19 is prime, but 2^3 - 2^3 < 0, 5^3 - 2^5 = 93 is not prime, 5^3 - 2^7 = 215 is not prime, 9^3 - 2^9 = 217 is not prime, 11^3 - 2^11 < 0. More generally, primes of the form k^r - m^k where  k > m > 0: r = 2: 3; r = 3: 7, 19; r = 4: 7, 17, 73, 593, 2273, 20369; r = 5: 7, 23, 31, 179, 58537, 1951811, 1986949; r = 6: 4818617, 24006497; r = 7: 7, 47, 79, 103, 127, 1137, 2179, 77101, 162287, 543607, 1706527, 9940951, 6069961193, 25365130463; r = 8: 31, 6553, 141793, 49046209, 815722529, 16983038753, 499709542049; r = 9: 71, 151, 223, 431, 463, 487, 503, 4521799, 133227103, 10604491181, 1175888158183; r = 10: 4177, 37097, 58049, 58537, 1803001, 2486784401, 3486783889, 41426502825041, 819626139497153, 52458394747474721. MATHEMATICA f[r_] := Length@ Rest@ Union@ Flatten@ Table[ If[ PrimeQ[k^r - m^k], k^r - m^k, 0], {k, 2, 10000000}, {m, Floor[k^(r/k)]}]; Do[ Print[ f[r]], {r, 2, 50}] (* Robert G. Wilson v, Aug 25 2014 *) CROSSREFS Cf. A045575, A123206, A245459, A245643. Sequence in context: A011044 A131212 A020771 * A261804 A021378 A329246 Adjacent sequences:  A242110 A242111 A242112 * A242114 A242115 A242116 KEYWORD nonn AUTHOR Juri-Stepan Gerasimov, Aug 15 2014 EXTENSIONS a(10)-a(50) from Robert G. Wilson v, Aug 25 2014 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.

Last modified August 10 08:22 EDT 2020. Contains 336368 sequences. (Running on oeis4.)
{"found_math": false, "script_math_tex": 0, "script_math_asciimath": 0, "math_annotations": 0, "math_alttext": 0, "mathml": 0, "mathjax_tag": 0, "mathjax_inline_tex": 0, "mathjax_display_tex": 0, "mathjax_asciimath": 0, "img_math": 0, "codecogs_latex": 0, "wp_latex": 0, "mimetex.cgi": 0, "/images/math/codecogs": 0, "mathtex.cgi": 0, "katex": 0, "math-container": 0, "wp-katex-eq": 0, "align": 0, "equation": 0, "x-ck12": 0, "texerror": 0, "url": "https://oeis.org/A242113", "fetch_time": 1597062196000000000, "content_mime_type": "text/html", "warc_filename": "crawl-data/CC-MAIN-2020-34/segments/1596439738674.42/warc/CC-MAIN-20200810102345-20200810132345-00475.warc.gz", "warc_record_offset": 422929249, "warc_record_length": 4328, "token_count": 1070, "char_count": 2428, "score": 3.828125, "int_score": 4, "crawl": "CC-MAIN-2020-34", "snapshot_type": "latest", "language": "en", "language_score": 0.5911728739738464, "file_path": "/sailhome/yjruan/project/latent-lm/data/processed/finemath-4plus/finemath-4plus/train-00043-of-00064.parquet"}