| 12345678910111213141516171819202122232425262728293031323334 |
- #!/usr/bin/ruby
- # https://oeis.org/A122858
- # https://oeis.org/A229616
- # https://oeis.org/A282031
- # Conjecture: -3 A122858(n) - A229616(n) + 4 A282031(n) = 0
- var terms = File("A282031.txt").open_r.lines.map{ .nums.last }
- func A122858(n) {
- return 1 if (n == 0)
- -8 * n.divisors.sum{|d| (-1)**d * d }
- }
- func A229616(n) {
- return 1 if (n == 0)
- -12 * n.divisors.sum{|d|
- d * [0, 1, -3, 4, -3, 1][d%6]
- }
- }
- func A282031(n) {
- terms[n]
- }
- for n in (1..60) {
- say (-3*A122858(n) - A229616(n) + 4*A282031(n))
- }
|
