|
|
|
|
|
|
|
|
|
#29 by OEIS Server at Fri Feb 23 20:13:23 EST 2024
|
|
| LINKS
|
Amiram Eldar, <a href="/A060860/b060860_1.txt">Table of n, a(n) for n = 1..55</a>
|
|
|
|
|
|
|
#28 by Michael De Vlieger at Fri Feb 23 20:13:23 EST 2024
|
|
|
|
|
|
Discussion
|
| Fri Feb 23
| 20:13
| OEIS Server: Installed first b-file as b060860.txt.
|
|
|
|
|
|
|
#27 by Hugo Pfoertner at Fri Feb 23 18:23:12 EST 2024
|
|
|
|
|
|
|
|
#26 by Amiram Eldar at Fri Feb 23 12:01:45 EST 2024
|
|
|
|
|
|
|
|
#25 by Amiram Eldar at Fri Feb 23 12:01:28 EST 2024
|
|
| LINKS
|
<a href="/index/Pow#powerful">Index entries for sequences related to powerful numbers</a>.
|
|
|
|
|
|
|
#24 by Amiram Eldar at Fri Feb 23 12:00:18 EST 2024
|
|
|
|
|
|
|
|
#23 by Amiram Eldar at Fri Feb 23 11:58:40 EST 2024
|
|
| MATHEMATICA
|
seq[max_] := Module[{p = Union[Flatten[Table[i^2*j^3, {j, 1, max^(1/3)}, {i, 1, Sqrt[max/j^3]}]]], q, i}, q = Union[p, 2*Select[p, # <= max && OddQ[#] &]]; i = Position[Differences[q], 2] // Flatten; Sqrt[q[[i]]*(q[[i]] + 2) + 1]]; seq[10^10] (* Amiram Eldar, Feb 23 2024 *)
|
|
|
|
|
|
|
#22 by Amiram Eldar at Fri Feb 23 11:56:38 EST 2024
|
|
|
|
|
|
|
|
#21 by Amiram Eldar at Fri Feb 23 11:54:51 EST 2024
|
|
| LINKS
|
Amiram Eldar, <a href="/A060860/b060860_1.txt">Table of n, a(n) for n = 1..55</a>
|
|
| STATUS
|
approved
editing
|
|
|
|
|
|
|
#20 by Amiram Eldar at Sun Sep 24 04:28:34 EDT 2023
|
|
|
|
|
|
|
