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.

A120700 a(n) is the least refactorable number k having the n-th prime as its greatest prime factor.

This page as a plain text file.
%I A120700 #10 Jan 15 2020 06:07:34
%S A120700 2,9,40,56,88,104,136,152,184,232,248,296,328,344,376,424,472,488,536,
%T A120700 568,584,632,664,712,776,808,824,856,872,904,1016,1048,1096,1112,1192,
%U A120700 1208,1256,1304,1336,1384,1432,1448,1528,1544,1576,1592,1688,1784,1816
%N A120700 a(n) is the least refactorable number k having the n-th prime as its greatest prime factor.
%H A120700 Amiram Eldar, <a href="/A120700/b120700.txt">Table of n, a(n) for n = 1..10000</a>
%t A120700 f[n_] := Block[{a = Mod[n, DivisorSigma[0, n]], b = PrimePi[FactorInteger[n][[ -1, 1]]]}, {a, b}]; t = Table[0, {100}]; Do[c = f[n]; If[c[[1]] == 0 && t[[c[[2]]]] == 0, t[[c[[2]]]] = n], {n, 2, 1831}]
%Y A120700 Cf. A033950, A036878.
%K A120700 nonn
%O A120700 1,1
%A A120700 _Walter Kehowski_ and _Robert G. Wilson v_, Jun 28 2006