aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data commit

Browse source
This commit is contained in:
Ingy döt Net 2023-07-01 11:58:00 -04:00
parent 7387c8f97b
commit cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Task/Jacobsthal-numbers/J/jacobsthal-numbers-1.j Normal file
View file

@ -0,0 +1,2 @@
ja=: 3 %~ 2x&^ - _1x&^ NB. Jacobsthal
jl=: 2x&^ + _1x&^ NB.Jacobsthal-Lucas

13
Task/Jacobsthal-numbers/J/jacobsthal-numbers-2.j Normal file
View file

@ -0,0 +1,13 @@
ja i.3 10
0 1 1 3 5 11 21 43 85 171
341 683 1365 2731 5461 10923 21845 43691 87381 174763
349525 699051 1398101 2796203 5592405 11184811 22369621 44739243 89478485 178956971
jl i.3 10
2 1 5 7 17 31 65 127 257 511
1025 2047 4097 8191 16385 32767 65537 131071 262145 524287
1048577 2097151 4194305 8388607 16777217 33554431 67108865 134217727 268435457 536870911
2 10$2 */\ ja i.21 NB. Jacobsthal oblong
0 1 3 15 55 231 903 3655 14535 58311
232903 932295 3727815 14913991 59650503 238612935 954429895 3817763271 15270965703 61084037575
ja I.1 p:ja i.32 NB. first ten Jacobsthal primes
3 5 11 43 683 2731 43691 174763 2796203 715827883