cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-4 of 4 results.

A320114 a(n) = Product_{d|n, d>1} prime(1+(d mod 4)).

Original entry on oeis.org

1, 5, 7, 10, 3, 175, 7, 20, 21, 75, 7, 700, 3, 175, 147, 40, 3, 2625, 7, 300, 147, 175, 7, 2800, 9, 75, 147, 700, 3, 91875, 7, 80, 147, 75, 147, 21000, 3, 175, 147, 1200, 3, 91875, 7, 700, 1323, 175, 7, 11200, 21, 1125, 147, 300, 3, 91875, 147, 2800, 147, 75, 7, 1470000, 3, 175, 3087, 160, 27, 91875, 7, 300, 147, 91875, 7, 168000, 3, 75
Offset: 1

Views

Author

Antti Karttunen, Oct 06 2018

Keywords

Crossrefs

Cf. A320115 (rgs-transform), A320116.
Cf. also A319984.
Cf. A002144 (a(n)=3), A002145 (a(n)=7).

Programs

  • PARI
    A320114(n) = { my(m=1); fordiv(n,d,if(d>1, m *= prime(1+(d%4)))); (m); };

Formula

a(n) = Product_{d|n, d>1} prime(1+(d mod 4)).

A319985 Fully multiplicative with a(p^e) = prime(p mod 12)^e.

Original entry on oeis.org

1, 3, 5, 9, 11, 15, 17, 27, 25, 33, 31, 45, 2, 51, 55, 81, 11, 75, 17, 99, 85, 93, 31, 135, 121, 6, 125, 153, 11, 165, 17, 243, 155, 33, 187, 225, 2, 51, 10, 297, 11, 255, 17, 279, 275, 93, 31, 405, 289, 363, 55, 18, 11, 375, 341, 459, 85, 33, 31, 495, 2, 51, 425, 729, 22, 465, 17, 99, 155, 561, 31, 675, 2, 6, 605, 153, 527, 30, 17
Offset: 1

Views

Author

Antti Karttunen, Oct 06 2018

Keywords

Comments

For all i, j:
a(i) = a(j) => A319984(i) = A319984(j).
a(i) = a(j) => A319986(i) = A319986(j).

Crossrefs

Programs

  • PARI
    A319985(n) = { my(f=factor(n)); prod(i=1, #f~, (prime(f[i, 1]%12))^f[i, 2]); };

A319986 Fully multiplicative with a(p^e) = prime(p mod 6)^e.

Original entry on oeis.org

1, 3, 5, 9, 11, 15, 2, 27, 25, 33, 11, 45, 2, 6, 55, 81, 11, 75, 2, 99, 10, 33, 11, 135, 121, 6, 125, 18, 11, 165, 2, 243, 55, 33, 22, 225, 2, 6, 10, 297, 11, 30, 2, 99, 275, 33, 11, 405, 4, 363, 55, 18, 11, 375, 121, 54, 10, 33, 11, 495, 2, 6, 50, 729, 22, 165, 2, 99, 55, 66, 11, 675, 2, 6, 605, 18, 22, 30, 2, 891, 625, 33, 11, 90, 121, 6
Offset: 1

Views

Author

Antti Karttunen, Oct 06 2018

Keywords

Comments

For all i, j:
A319716(i) = A319716(j) => a(i) = a(j) => A319690(i) = A319690(j).

Crossrefs

Programs

  • PARI
    A319986(n) = { my(f=factor(n)); prod(i=1, #f~, (prime(f[i, 1]%6))^f[i, 2]); };

A319987 Fully multiplicative with a(p^e) = prime(p mod 8)^e.

Original entry on oeis.org

1, 3, 5, 9, 11, 15, 17, 27, 25, 33, 5, 45, 11, 51, 55, 81, 2, 75, 5, 99, 85, 15, 17, 135, 121, 33, 125, 153, 11, 165, 17, 243, 25, 6, 187, 225, 11, 15, 55, 297, 2, 255, 5, 45, 275, 51, 17, 405, 289, 363, 10, 99, 11, 375, 55, 459, 25, 33, 5, 495, 11, 51, 425, 729, 121, 75, 5, 18, 85, 561, 17, 675, 2, 33, 605, 45, 85, 165, 17, 891, 625, 6, 5
Offset: 1

Views

Author

Antti Karttunen, Oct 06 2018

Keywords

Comments

For all i, j: a(i) = a(j) => A319984(i) = A319984(j).

Crossrefs

Programs

  • PARI
    A319987(n) = { my(f=factor(n)); prod(i=1, #f~, (prime(f[i, 1]%8))^f[i, 2]); };
Showing 1-4 of 4 results.