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.

A259021 Numbers k such that k^2 = Product_{d|k} d (= A007955(k)) and simultaneously k^2 + 1 is a divisorial prime (A258455).

Original entry on oeis.org

1, 6, 10, 14, 26, 74, 94, 134, 146, 206, 314, 326, 386, 466, 634, 674, 1094, 1174, 1294, 1306, 1354, 1366, 1546, 1654, 1766, 1774, 1894, 1966, 2026, 2126, 2174, 2326, 2594, 2654, 2746, 2974, 2986, 3046, 3106, 3134, 3214, 3254, 3274, 3314, 3326, 3334, 3446
Offset: 1

Views

Author

Jaroslav Krizek, Sep 01 2015

Keywords

Comments

First deviation from A259020 is at a(15).
With number 2 complement of A259023 with respect to A118369.
1 together with squarefree semiprimes (A006881) k such that k^2 + 1 is prime. Without the squarefree restriction there will be only one more term, 4. - Amiram Eldar, Sep 25 2022

Examples

			The number 10 is in sequence because 10^2 = 1*2*5*10 = 100 and simultaneously 101 is prime.
		

Crossrefs

Union of {1} and (intersection of A005574 and A006881).
Subsequence of A007422, A048943, A259020, A118369.

Programs

  • Magma
    [Floor(Sqrt(n-1)): n in [1..10000000] | IsPrime(n) and n-1 eq (&*(Divisors(Floor(Sqrt(n-1)))))];
    
  • Mathematica
    Prepend[2*Select[Prime[Range[2, 300]], PrimeQ[4 #^2 + 1] &], 1] (* Amiram Eldar, Sep 25 2022 *)
  • Sage
    a = [n for n in range(1,100000) if is_prime(n^2+1) and n^2==prod(list(divisors(n)))] # Danny Rorabaugh, Sep 21 2015

Formula

a(n) = 2*A052291(n) for n > 1. - Amiram Eldar, Sep 25 2022

A259023 Numbers n such that Product_{d|n} d = k^2 for some k > n and simultaneously number k^2 + 1 is a divisorial prime (A258455).

Original entry on oeis.org

24, 54, 56, 88, 154, 174, 238, 248, 266, 296, 328, 374, 378, 430, 442, 472, 488, 494, 498, 510, 568, 582, 584, 680, 710, 730, 742, 786, 856, 874, 894, 918, 962, 986, 1038, 1246, 1270, 1406, 1434, 1442, 1446, 1542, 1558, 1586, 1598
Offset: 1

Views

Author

Jaroslav Krizek, Sep 01 2015

Keywords

Comments

Product_{d|n} d is the product of divisors of n (A007955).
If 1+ Product_{d|k} d for k > 2 is a prime p, then p-1 is a square.
With number 2 complement of A259021 with respect to A118369.
See A258897 - divisorial primes of the form 1 + Product_{d|a(n)} d.

Examples

			The number 24 is in sequence because A007955(24) = 331776 = 576^2 and simultaneously 331777 is prime.
		

Crossrefs

Subsequence of A048943 (product of divisors of n is a square) and A118369 (numbers n such that Prod_{d|n} d + 1 is prime).

Programs

  • Magma
    [n: n in [1..2000] | &*(Divisors(n)) ne n^2 and IsSquare(&*(Divisors(n))) and IsPrime(&*(Divisors(n))+1)];
    
  • PARI
    A007955(n)=if(issquare(n, &n), n^numdiv(n^2), n^(numdiv(n)/2))
    is(n)=my(t=A007955(n)); t>n^2 && issquare(t) && isprime(t+1) \\ Charles R Greathouse IV, Sep 01 2015
Showing 1-2 of 2 results.