A115531 Numbers k such that the concatenation of k with 3*k gives a square.
816326530612244897959183673469388, 1836734693877551020408163265306123, 3265306122448979591836734693877552, 3746097814776274713839750260145681581685744016649323621228
Offset: 1
Links
- Robert Israel, Table of n, a(n) for n = 1..113
Programs
-
Maple
Res:= NULL: for m from 1 to 67 do if not numtheory:-issqrfree(3+10^m) then F:= select(t -> t[2]=1, ifactors(3+10^m)[2]); v:= mul(t[1], t=F); Res:= Res, seq(t^2*v, t = ceil(sqrt(10^(m-1)/(3*v))) .. floor(sqrt(10^m/(3*v)))) fi od: Res; # Robert Israel, Aug 07 2019
Comments