Xenharmonic Wiki

Module:Sequence: Difference between revisions

← Older edit
Plumtree (talk | contribs)
autopatrolled, emailconfirmed
1,976 edits
Square superparticulars until prime limit 101 added
ArrowHead294 (talk | contribs)
15,213 edits
mNo edit summary
 
(11 intermediate revisions by 3 users not shown)
Line 1: Line 1:
local p = {}
local p = {}
local getArgs = require('Module:Arguments').getArgs


function p.contains(seq, n)
function p.contains(seq, n)
Line 12: Line 14:
return false
return false
end
end
function p.get_term(frame)
local args = getArgs(frame)
return p._get_term(args[1], tonumber (args[2]))
end
function p._get_term(seq, n)
local sequences = {
["odd_limit_diff"] = p.odd_limit_diff,
["zeta_peak"] = p.zeta_peak,
["zeta_integral"] = p.zeta_integral,
["zeta_gap"] = p.zeta_gap,
["square_superparticulars"] = p.square_superparticulars
}
return sequences[seq][n]
end
-- OEIS A072451
-- Number of odd terms in the reduced residue system of 2*n-1
-- Corresponds to the number of new interval pairs between the (2n-3)-odd-limit
-- and the (2n-1)-odd-limit, assuming the 1-odd-limit has 1 "pair" of intervals.
p.odd_limit_diff = {
1, 1, 2, 3, 3, 5, 6, 4, 8, 9,
6, 11, 10, 9, 14, 15, 10, 12, 18, 12,
20, 21, 12, 23, 21, 16, 26, 20, 18, 29,
30, 18, 24, 33, 22, 35, 36, 20, 30, 39,
27, 41, 32, 28, 44, 36, 30, 36, 48, 30,
50, 51, 24, 53, 54, 36, 56, 44, 36, 48,
55, 40, 50, 63, 42, 65, 54, 36, 68, 69,
46, 60, 56
}


-- OEIS A117536
-- OEIS A117536
p.zeta_peak = {
p.zeta_peak = {
0, 1, 2, 3, 4,
0, 1, 2, 3, 4, 5, 7,
5, 7, 10, 12, 19,
10, 12, 19, 22, 27, 31, 41, 53, 72, 99,
22, 27, 31, 41, 53,
118, 130, 152, 171, 217, 224, 270, 342, 422, 441, 494, 742, 764, 935, 954,
72, 99, 118, 130, 152,
1012, 1106, 1178, 1236, 1395, 1448, 1578, 2460, 2684, 3395, 5585, 6079, 7033, 8269, 8539,
171, 217, 224, 270, 342,
11664, 14348, 16808, 28742, 34691,
422, 441, 494, 742, 764,
935, 954, 1012, 1106, 1178,
1236, 1395, 1448, 1578, 2460,
2684, 3395, 5585, 6079, 7033,
8269, 8539, 11664, 14348, 16808,
28742, 34691,
-- unconfirmed data from [[The Riemann zeta function and tuning #Zeta EDO lists]]
-- unconfirmed data from [[The Riemann zeta function and tuning #Zeta EDO lists]]
36269, 57578, 58973, 95524, 102557,
36269, 57578, 58973, 95524,
112985, 148418, 212147, 241200
102557, 112985, 148418, 212147, 241200
}
 
p.zeta_peak_integer = {
0, 1, 2, 3, 5, 7,
10, 12, 19, 22, 31, 41, 53, 87,
118, 130, 171, 224, 270, 311, 472, 494, 742,
1065, 1106, 1395, 1578, 2460, 2684, 3566, 4231, 4973, 5585, 8269, 8539,
14124, 14348, 16808, 28742, 30631, 34691, 36269, 57578, 58973
}
}


-- OEIS A117538
-- OEIS A117538
p.zeta_integral = {
p.zeta_integral = {
2, 5, 7, 12, 19,
2, 5, 7,
31, 41, 53, 72, 130,
12, 19, 31, 41, 53, 72,
171, 224, 270, 764, 954,
130, 171, 224, 270, 764, 954,
1178, 1395, 1578, 2684, 3395,
1178, 1395, 1578, 2684, 3395, 7033, 8269, 8539,
7033, 8269, 8539, 14348, 16808,
14348, 16808, 36269, 58973
36269, 58973
}
}


-- OEIS A117537
-- OEIS A117537
p.zeta_gap = {
p.zeta_gap = {
2, 3, 5, 7, 12,
2, 3, 5, 7,
19, 31, 46, 53, 72,
12, 19, 31, 46, 53, 72,
270, 311, 954, 1178, 1308,
270, 311, 954,
1395, 1578, 3395, 4190,
1178, 1308, 1395, 1578, 3395, 4190,
-- unconfirmed data from [[The Riemann zeta function and tuning #Zeta EDO lists]]
-- unconfirmed data from [[The Riemann zeta function and tuning#Zeta EDO lists]]
8539, 14348, 58973, 95524
8539,
14348, 58973, 95524
}
}


Line 54: Line 89:
-- counted by OEIS A117582
-- counted by OEIS A117582
-- see https://github.com/lucasaugustus/oeis/blob/main/stormer.py
-- see https://github.com/lucasaugustus/oeis/blob/main/stormer.py
p.square_superpartuculars = {
p.square_superparticulars = {
[2] = {},
[2] = {},
[3] = {2, 3},
[3] = {2, 3},
Retrieved from "https://en.xen.wiki/w/Module:Sequence"