|
|
|
|
|
|
|
|
|
#46 by Michael De Vlieger at Wed Jan 24 21:28:07 EST 2024
|
|
|
|
|
|
|
|
#45 by Stefano Spezia at Wed Jan 24 15:18:50 EST 2024
|
|
|
|
|
|
|
|
#44 by Hartmut F. W. Hoft at Wed Jan 24 14:25:22 EST 2024
|
|
|
|
|
|
|
|
#43 by Hartmut F. W. Hoft at Wed Jan 24 11:50:37 EST 2024
|
|
|
|
|
|
Discussion
|
| Wed Jan 24
| 12:35
| Stefano Spezia: Did you forget to propose for review?
|
|
| 14:25
| Hartmut F. W. Hoft: I thought that I did
|
|
|
|
|
|
|
#42 by Stefano Spezia at Wed Jan 24 11:15:27 EST 2024
|
|
|
|
|
|
Discussion
|
| Wed Jan 24
| 11:50
| Hartmut F. W. Hoft: fine by me. Though generally I have not included a symbol like "nmax" . Sometimes, I have added a comment (* data *) to indicate computation for the DATA section
|
|
|
|
|
|
|
#41 by Stefano Spezia at Wed Jan 24 11:15:08 EST 2024
|
|
| MATHEMATICA
|
nmax = 812; Select[Range[nnmax], periodicQ] (* _Hartmut F. W. Hoft_, Jan 24 2024 *)]
(* Hartmut F. W. Hoft, Jan 24 2024 *)
|
|
|
|
|
Discussion
|
| Wed Jan 24
| 11:15
| Stefano Spezia: Ok, like this?
|
|
|
|
|
|
|
#40 by Stefano Spezia at Wed Jan 24 11:14:37 EST 2024
|
|
| MATHEMATICA
|
a003062[n_] := nmax = 812; Select[Range[n], periodicQ]] (* _Hartmut F. W. Hoft_, Jan 24 2024 *)
a003062[812] (* Hartmut F. W. Hoft, Jan 24 2024 *)
|
|
| STATUS
|
proposed
editing
|
|
|
|
|
|
|
#39 by Hartmut F. W. Hoft at Wed Jan 24 11:07:01 EST 2024
|
|
|
|
|
|
|
|
#38 by Hartmut F. W. Hoft at Wed Jan 24 11:05:48 EST 2024
|
|
| MATHEMATICA
|
(* _a003062[812] (* _Hartmut F. W. Hoft_, Jan 24 2024 *)
|
|
| STATUS
|
proposed
editing
|
|
|
|
|
Discussion
|
| Wed Jan 24
| 11:07
| Hartmut F. W. Hoft: Stefano, Thanks, I added the last missing line.
|
|
|
|
|
|
|
#37 by Hartmut F. W. Hoft at Wed Jan 24 10:26:46 EST 2024
|
|
|
|
|
|
Discussion
|
| Wed Jan 24
| 10:59
| Stefano Spezia: Your code does not provide the terms like in Data field, but as size-increasing lists
|
|
|
|
|
|
