login
Numbers that occur more than once in A338529.
2

%I #8 Nov 03 2020 16:10:47

%S 4320,23142,301310,333414,340352,375650,553520,644490,910872,921730,

%T 1133670,1366090,1422650,1440138,1650350,1705070,1751970,1874430,

%U 2091850,2180768,2852640,3213780,3438548,3676320,4044732,4444662,4682000,4854274,4863754,5101914,5384106,6011250,6309860,6551688

%N Numbers that occur more than once in A338529.

%C Does any number occur more than twice in A338529?

%H Robert Israel, <a href="/A338537/b338537.txt">Table of n, a(n) for n = 1..609</a>

%e a(3) = 301310 is in the sequence because A338529(1618) = A338529(2414) = 301310.

%p A338529:= [seq(ithprime(n+2)*ithprime(n+3)-ithprime(n)*ithprime(n+1), n=1..100000)]):

%p M:= 12*ithprime(100000):

%p V:= Vector(M,datatype=integer[4]):

%p R:= NULL:

%p for i from 1 to 100000 do

%p v:= A338529[i];

%p if v <= M then V[v]:= V[v]+1; if V[v] > 1 then R:= R, v fi fi

%p od:

%p sort([R]);

%Y Cf. A338529.

%K nonn

%O 1,1

%A _J. M. Bergot_ and _Robert Israel_, Nov 01 2020