login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A325756 A number n belongs to the sequence if n = 1 or n is divisible by its prime shadow A181819(n) and the quotient n/A181819(n) also belongs to the sequence. 1
1, 2, 12, 336, 360, 45696, 52416, 75600 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

We define the prime shadow A181819(n) to be the product of primes indexed by the exponents in the prime factorization of n. For example, 90 = prime(1)*prime(2)^2*prime(3) has prime shadow prime(1)*prime(2)*prime(1) = 12.

LINKS

Table of n, a(n) for n=1..8.

EXAMPLE

The sequence of terms together with their prime indices begins:

      1: {}

      2: {1}

     12: {1,1,2}

    336: {1,1,1,1,2,4}

    360: {1,1,1,2,2,3}

  45696: {1,1,1,1,1,1,1,2,4,7}

  52416: {1,1,1,1,1,1,2,2,4,6}

  75600: {1,1,1,1,2,2,2,3,3,4}

MATHEMATICA

red[n_] := If[n == 1, 1, Times @@ Prime /@ Last /@ FactorInteger[n]];

suQ[n_]:=n==1||Divisible[n, red[n]]&&suQ[n/red[n]];

Select[Range[10000], suQ]

CROSSREFS

Cf. A181819, A182857, A290689, A290822, A323014, A324843, A325702, A325706, A325708, A325755.

Sequence in context: A156518 A012727 A296622 * A181142 A088229 A060596

Adjacent sequences:  A325753 A325754 A325755 * A325757 A325758 A325759

KEYWORD

nonn,more

AUTHOR

Gus Wiseman, May 19 2019

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified January 27 15:14 EST 2020. Contains 331295 sequences. (Running on oeis4.)