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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A259731 Least positive integer k such that prime(k*n)-1 is a square, or 0 if no such k exists. 5
1, 6, 1, 3, 9, 2, 1, 181, 5, 459, 5, 1, 2, 18, 3, 421, 35, 14, 183, 3274, 12, 143, 501, 422, 1407, 1, 170, 9, 55, 153, 2044, 426, 274, 74, 17, 7, 68, 452, 1084, 1637, 3, 6, 43, 1141, 1, 8218, 1860, 211, 42, 1582, 53, 813, 2, 85, 1, 5714, 61, 1379, 296, 1457, 57, 1022, 4, 213, 1331, 137, 525, 37, 167, 1130 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

Conjecture: a(n) > 0 for all n > 0.

This is stronger than the well-known conjecture that there are infinitely many primes of the form x^2+1 with x an integer.

REFERENCES

Zhi-Wei Sun, Problems on combinatorial properties of primes, in: M. Kaneko, S. Kanemitsu and J. Liu (eds.), Number Theory: Plowing and Starring through High Wave Forms, Proc. 7th China-Japan Seminar (Fukuoka, Oct. 28 - Nov. 1, 2013), Ser. Number Theory Appl., Vol. 11, World Sci., Singapore, 2015, pp. 169-187.

LINKS

Zhi-Wei Sun, Table of n, a(n) for n = 1..2000

Zhi-Wei Sun, Problems on combinatorial properties of primes, arXiv:1402.6641 [math.NT], 2014.

EXAMPLE

a(1) = 1 since prime(1*1)-1 = 2-1 = 1^2.

a(2) = 6 since prime(6*2)-1 = 37-1 = 6^2.

MATHEMATICA

SQ[n_]:=IntegerQ[Sqrt[n]]

Do[k=0; Label[bb]; k=k+1; If[SQ[Prime[k*n]-1], Goto[aa], Goto[bb]]; Label[aa]; Print[n, " ", k]; Continue, {n, 1, 70}]

lpi[n_]:=Module[{k=1}, While[!IntegerQ[Sqrt[Prime[k*n]-1]], k++]; k]; Array[ lpi, 70] (* Harvey P. Dale, Apr 18 2019 *)

CROSSREFS

Cf. A000040, A000290, A002496, A076948, A238573, A259712.

Sequence in context: A188859 A074584 A195478 * A176399 A273081 A181552

Adjacent sequences:  A259728 A259729 A259730 * A259732 A259733 A259734

KEYWORD

nonn

AUTHOR

Zhi-Wei Sun, Jul 04 2015

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 14 09:57 EDT 2019. Contains 327995 sequences. (Running on oeis4.)