The OEIS mourns the passing of Jim Simons and is grateful to the Simons Foundation for its support of research in many branches of science, including the OEIS.
login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A349200 Loeschian numbers of the form (x + y)*(x^2 + y^2). 2
0, 1, 4, 27, 64, 108, 156, 175, 256, 259, 343, 400, 729, 1261, 1372, 1417, 1728, 1875, 2197, 2916, 3439, 3492, 3667, 4096, 4212, 4579, 4725, 6175, 6859, 6912, 6993, 7104, 7825, 8112, 8125, 8425, 8788, 9261, 9264, 9325, 9925, 9984, 10800, 11200, 11425, 11712 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,3
COMMENTS
k is in this sequence if there exist numbers x, y, v, w such that k = x^2 + x*y + y^2 = (v + w)*(v^2 + w^2). We call (x, y, v, w) a witness of k. k can have different witnesses.
LINKS
FORMULA
Intersection of A003136 and A348897.
EXAMPLE
729 = 27^2 + 27*0 + 0^2 = (9 + 0)*(9^2 + 0^2).
3492 = 48^2 + 48*18 + 18^2 = (13 + 5)*(13^2 + 5^2).
3667 = 53^2 + 53*13 + 13^2 = (12 + 7)*(12^2 + 7^2).
PROG
(Julia) # Returns the terms less than or equal to b^3.
# Uses the function isA003136 from A003136.
function A349200List(b)
b3 = b^3; R = [0]
for n in 1:b
for k in 0:n
a = (n + k) * (n^2 + k^2)
a > b3 && break
isA003136(a) && push!(R, a)
end end
sort(R) end
A349200List(24) |> println
CROSSREFS
Sequence in context: A218629 A190403 A141091 * A078111 A186882 A097792
KEYWORD
nonn
AUTHOR
Peter Luschny, Nov 10 2021
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified June 3 03:48 EDT 2024. Contains 373054 sequences. (Running on oeis4.)