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.

Previous Showing 11-13 of 13 results.

A318588 Heinz numbers of integer partitions whose sum of reciprocals squared is an integer.

Original entry on oeis.org

1, 2, 4, 8, 16, 32, 64, 81, 128, 162, 256, 324, 512, 648, 1024, 1296, 2048, 2592, 4096, 5184, 6561, 8192, 8775, 10368, 13122, 16384, 17550, 20736, 26244, 32768, 35100, 41472, 52488, 64827, 65536, 70200, 82944, 104976, 129654, 131072, 140400, 165888, 209952
Offset: 1

Views

Author

Gus Wiseman, Aug 29 2018

Keywords

Comments

The Heinz number of an integer partition (y_1, ..., y_k) is prime(y_1) * ... * prime(y_k).

Examples

			Sequence of integer partitions whose Heinz numbers belong to the sequence begins: (), (1), (11), (111), (1111), (11111), (111111), (2222), (1111111), (22221), (11111111), (222211), (111111111), (2222111).
		

Crossrefs

Programs

  • Mathematica
    Select[Range[10000],IntegerQ[Total[If[#==1,{},Cases[FactorInteger[#],{p_,k_}:>k/PrimePi[p]^2]]]]&]

A318589 Heinz numbers of integer partitions whose sum of reciprocals squared is the reciprocal of an integer.

Original entry on oeis.org

2, 3, 5, 7, 9, 11, 13, 17, 19, 23, 29, 31, 37, 41, 43, 47, 49, 53, 59, 61, 67, 71, 73, 79, 81, 83, 89, 97, 101, 103, 107, 109, 113, 125, 127, 131, 137, 139, 149, 151, 157, 163, 167, 169, 173, 179, 181, 191, 193, 197, 199, 211, 223, 227, 229, 233, 239, 241, 251
Offset: 1

Views

Author

Gus Wiseman, Aug 29 2018

Keywords

Comments

The Heinz number of an integer partition (y_1, ..., y_k) is prime(y_1) * ... * prime(y_k).

Crossrefs

Programs

  • Mathematica
    Select[Range[2,1000],IntegerQ[1/Total[If[#==1,{},Cases[FactorInteger[#],{p_,k_}:>k/PrimePi[p]^2]]]]&]

A318574 Denominator of the reciprocal sum of the integer partition with Heinz number n.

Original entry on oeis.org

1, 1, 2, 1, 3, 2, 4, 1, 1, 3, 5, 2, 6, 4, 6, 1, 7, 1, 8, 3, 4, 5, 9, 2, 3, 6, 2, 4, 10, 6, 11, 1, 10, 7, 12, 1, 12, 8, 3, 3, 13, 4, 14, 5, 3, 9, 15, 2, 2, 3, 14, 6, 16, 2, 15, 4, 8, 10, 17, 6, 18, 11, 4, 1, 2, 10, 19, 7, 18, 12, 20, 1, 21, 12, 6, 8, 20, 3, 22
Offset: 1

Views

Author

Gus Wiseman, Aug 29 2018

Keywords

Comments

The reciprocal sum of (y_1, ..., y_k) is 1/y_1 + ... + 1/y_k. The Heinz number of an integer partition (y_1, ..., y_k) is prime(y_1) * ... * prime(y_k).

Crossrefs

Programs

  • Mathematica
    Table[Sum[pr[[2]]/PrimePi[pr[[1]]],{pr,If[n==1,{},FactorInteger[n]]}],{n,100}]//Denominator

Formula

If n = Product prime(x_i)^y_i is the prime factorization of n, then a(n) is the denominator of Sum y_i/x_i.
Previous Showing 11-13 of 13 results.