The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A347754 (Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing entries 1-10 | older changes

A347754

a(n) = sqrt(A347594(n-1)^2 + n^2 + A347594(n)).
(history; published version)

#18 by Peter Luschny at Tue Sep 14 03:56:04 EDT 2021

STATUS

reviewed

approved

#17 by Joerg Arndt at Tue Sep 14 03:50:53 EDT 2021

STATUS

proposed

reviewed

#16 by Michel Marcus at Mon Sep 13 12:39:23 EDT 2021

STATUS

editing

proposed

#15 by Michel Marcus at Mon Sep 13 12:39:18 EDT 2021

PROG

(PARI) lista(nn) = {my(prec = 1, list=List(), x); for (n=1, nn, my(k = 1); while (!issquare(x = prec^2+n^2+k), k++); listput(list, sqrtint(x)); prec = k; ); Vec(list); } \\ Michel Marcus, Sep 13 2021

STATUS

proposed

editing

#14 by Chai Wah Wu at Mon Sep 13 11:57:06 EDT 2021

STATUS

editing

proposed

#13 by Chai Wah Wu at Mon Sep 13 11:54:41 EDT 2021

PROG

(Python)

A347595_A347754_list, a = [], 1

A347595_ A347754_list.append(k) # Chai Wah Wu, Sep 13 2021

#12 by Chai Wah Wu at Mon Sep 13 11:52:56 EDT 2021

PROG

from math import isqrt

A347595_list, a = [], 1

for n in range(1, 10**3):

m = a**2+n**2

k = isqrt(m)+1

a = k**2-m

A347595_list.append(k) # Chai Wah Wu, Sep 13 2021

STATUS

proposed

editing

#11 by Seiichi Manyama at Mon Sep 13 11:51:50 EDT 2021

STATUS

editing

proposed

#10 by Seiichi Manyama at Mon Sep 13 11:50:22 EDT 2021

LINKS

Seiichi Manyama, <a href="/A347754/b347754.txt">Table of n, a(n) for n = 1..10000</a>

STATUS

approved

editing

#9 by Susanna Cuyler at Mon Sep 13 11:38:35 EDT 2021

STATUS

proposed

approved