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

A239669 Total number of prime factors counted with multiplicity of prime(n)-1 and prime(n)+1, where prime(n) is the n-th prime.

Original entry on oeis.org

1, 3, 4, 5, 5, 5, 7, 6, 6, 6, 8, 6, 7, 6, 7, 7, 6, 6, 6, 8, 7, 8, 6, 8, 9, 7, 7, 7, 8, 8, 11, 7, 7, 7, 7, 8, 6, 8, 7, 6, 7, 8, 10, 9, 8, 9, 7, 9, 6, 7, 8, 9, 9, 9, 11, 7, 8, 10, 6, 8, 6, 7, 8, 8, 7, 6, 7, 9, 6, 8, 9, 8, 8, 7, 9, 10, 7, 7, 9, 8, 8, 7, 10, 10
Offset: 1

Views

Author

Chris Boyd, Mar 23 2014

Keywords

Comments

If a(n) <= 6, n is a distinguished prime (A106639). According to a conjecture in A106639, 6 is the least term appearing infinitely often. Numerical evidence suggests the conjecture that other - perhaps all - integers > 6 appear infinitely often. The strong conjecture implies that all terms but one in A155800 are positive.

Examples

			a(7) = 7 as prime(7) = 17, 17-1 = 2^4 and 17+1 = 2*3^2, so total number of prime factors = 4+3 = 7.
		

Crossrefs

Programs

  • PARI
    forprime(p=1,500,print1(bigomega(p-1) + bigomega(p+1)", "))

Formula

a(n) = Omega(prime(n)^2 - 1), where Omega is A001222.

A110300 Not-really primes: numbers n such that n - 1, n and n + 1 all have only 1 or 2 prime factors.

Original entry on oeis.org

3, 4, 5, 6, 10, 14, 22, 34, 38, 58, 86, 94, 122, 142, 158, 178, 202, 214, 218, 302, 382, 394, 446, 502, 542, 634, 698, 718, 842, 878, 922, 1042, 1138, 1202, 1262, 1318, 1346, 1382, 1402, 1438, 1622, 1642, 1762, 1822, 1838, 1894, 1942, 1982, 2018, 2102
Offset: 1

Views

Author

Walter Nissen, Aug 03 2005

Keywords

Examples

			14 is in the sequence because 13, 14 and 15 have only 1, 2 and 2 prime factors respectively, viz. 13, 2 * 7 and 3 * 5.
		

Crossrefs

Programs

  • Maple
    S:= select(t -> numtheory:-bigomega(t) <= 2, {$2..3000}):
    sort(convert(S intersect map(`+`,S,1) intersect map(`-`,S,1),list)); # Robert Israel, Dec 15 2019
  • PARI
    isok(n) = (bigomega(n-1)>0) && (bigomega(n-1)<=2) && (bigomega(n)<=2) && (bigomega(n+1)<=2) \\ Michel Marcus, Jul 23 2013
Showing 1-2 of 2 results.