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-1 of 1 results.

A213420 Smallest number k such that the sum of prime factors of k (counted with multiplicity) is n times a square > 1.

Original entry on oeis.org

4, 15, 35, 39, 51, 95, 115, 87, 155, 111, 123, 215, 235, 159, 371, 183, 302, 335, 219, 511, 395, 415, 267, 623, 291, 303, 482, 327, 339, 791, 554, 1415, 635, 655, 411, 695, 662, 447, 698, 471, 734, 815, 835, 519, 1211, 543, 842, 1991, 579, 591, 914, 2167, 2587
Offset: 1

Views

Author

Michel Lagneau, Jun 11 2012

Keywords

Comments

Smallest k such that sopfr(k) = n*q^2.
a(n) = A213386(n), except for n = 1, 105, 173, 213, 227, 287, …

Examples

			a(105) = 3764 because 3764 = 2^2 * 941 and  the sum of prime factors  (counted with multiplicity) is 4 + 941 = 945 = 105*9 where 9 is a square.
		

Crossrefs

Programs

  • Maple
    with(numtheory):
    sopfr:= proc(n) option remember;
    add(i[1]*i[2], i=ifactors(n)[2])
    end:
    a:= proc(n) local k, p;
    for k from 2 while irem(sopfr(k), n, 'p')>0 or
    sqrt(p)<>floor(sqrt(p)) or p=1 do od; k
    end:
    seq (a(n), n=1..100);
Showing 1-1 of 1 results.