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!)
A343431 Part of n composed of prime factors of the form 6k-1. 1
1, 1, 1, 1, 5, 1, 1, 1, 1, 5, 11, 1, 1, 1, 5, 1, 17, 1, 1, 5, 1, 11, 23, 1, 25, 1, 1, 1, 29, 5, 1, 1, 11, 17, 5, 1, 1, 1, 1, 5, 41, 1, 1, 11, 5, 23, 47, 1, 1, 25, 17, 1, 53, 1, 55, 1, 1, 29, 59, 5, 1, 1, 1, 1, 5, 11, 1, 17, 23, 5, 71, 1, 1, 1, 25, 1, 11, 1, 1, 5, 1, 41, 83, 1, 85, 1, 29, 11, 89, 5 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,5

COMMENTS

Completely multiplicative with a(p) = p if p is of the form 6k-1 and a(p) = 1 otherwise.

Largest term of A259548 that divides n.

LINKS

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

FORMULA

a(n) = n / A065331(n) / A248909(n) = A065330(n) / A248909(n).

MATHEMATICA

f[p_, e_] := If[Mod[p, 6] == 5, p^e, 1]; a[1] = 1; a[n_] := Times @@ f @@@ FactorInteger[n]; Array[a, 100] (* after Amiram Eldar at A248909 *)

PROG

(PARI) a(n) = {my(f = factor(n)); for (i=1, #f~, if ((f[i, 1] + 1) % 6, f[i, 1] = 1); ); factorback(f); } \\ after Michel Marcus at A248909

CROSSREFS

Equivalent sequence for distinct prime factors: A170825.

Equivalent sequences for prime factors of other forms: A000265 (2k+1), A170818 (4k+1), A097706 (4k-1), A248909 (6k+1), A065330 (6k+/-1), A065331 (<= 3).

Range of terms: A259548.

Sequence in context: A046622 A170825 A140214 * A071020 A046601 A101025

Adjacent sequences:  A343427 A343428 A343429 * A343432 A343433 A343434

KEYWORD

nonn,easy,mult

AUTHOR

Peter Munn, Apr 15 2021

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 May 5 19:09 EDT 2021. Contains 343573 sequences. (Running on oeis4.)