A336158 -id:A336158 - cp's OEIS frontend

A336934 Lexicographically earliest infinite sequence such that a(i) = a(j) => A007733(i) = A007733(j) and A336158(i) = A336158(j), for all i, j >= 1.

1, 1, 2, 1, 3, 2, 4, 1, 5, 3, 6, 2, 7, 4, 8, 1, 9, 5, 10, 3, 11, 6, 12, 2, 13, 7, 14, 4, 15, 8, 16, 1, 17, 9, 18, 5, 19, 10, 18, 3, 20, 11, 21, 6, 22, 12, 23, 2, 24, 13, 25, 7, 26, 14, 27, 4, 28, 15, 29, 8, 30, 16, 31, 1, 18, 17, 32, 9, 33, 18, 34, 5, 35, 19, 36, 10, 37, 18, 38, 3, 39, 20, 40, 11, 25, 21, 41, 6, 12, 22, 18, 12, 17, 23, 42, 2, 43, 24, 44, 13, 45, 25, 46, 7, 47

Offset: 1

Antti Karttunen, Aug 10 2020

nonn

Restricted growth sequence transform of the ordered pair [A007733(n), A336158(n)].

For all i, j: A324400(i) = A324400(j) => A003602(i) = A003602(j) => a(i) = a(j).

Antti Karttunen, Table of n, a(n) for n = 1..65537

Cf. A007733, A336158, A336933, A336935, A336936.

up_to = 65537;
rgs_transform(invec) = { my(om = Map(), outvec = vector(length(invec)), u=1); for(i=1, length(invec), if(mapisdefined(om,invec[i]), my(pp = mapget(om, invec[i])); outvec[i] = outvec[pp] , mapput(om,invec[i],i); outvec[i] = u; u++ )); outvec; };
A007733(n) = znorder(Mod(2, n/2^valuation(n, 2))); \\ From A007733
A000265(n) = (n>>valuation(n,2));
A046523(n) = { my(f=vecsort(factor(n)[, 2], , 4), p); prod(i=1, #f, (p=nextprime(p+1))^f[i]); };  \\ From A046523
A336158(n) = A046523(A000265(n));
Aux336934(n) = [A007733(n), A336158(n)];
v336934 = rgs_transform(vector(up_to, n, Aux336934(n)));
A336934(n) = v336934[n];

A351035 Lexicographically earliest infinite sequence such that a(i) = a(j) => A347385(i) = A347385(j) and A336158(i) = A336158(j), for all i, j >= 1.

Original entry on oeis.org

1, 1, 2, 1, 3, 2, 4, 1, 5, 3, 6, 2, 7, 4, 8, 1, 9, 5, 10, 3, 11, 6, 12, 2, 13, 7, 14, 4, 15, 8, 16, 1, 17, 9, 17, 5, 18, 10, 19, 3, 20, 11, 21, 6, 22, 12, 23, 2, 24, 13, 25, 7, 26, 14, 25, 4, 27, 15, 28, 8, 29, 16, 30, 1, 31, 17, 32, 9, 33, 17, 34, 5, 35, 18, 36, 10, 33, 19, 37, 3, 38, 20, 39, 11, 40, 21, 41, 6, 42

Offset: 1

Antti Karttunen, Jan 30 2022

Restricted growth sequence transform of the ordered pair [A347385(n), A336158(n)], where A347385(n) is the Dedekind psi function applied to the odd part of n, i.e., A001615(A000265(n)), and A336158(n) is the least representative of the prime signature of the odd part of n.

For all i, j >= 1: A003602(i) = A003602(j) => a(i) = a(j).

			a(33) = a(35) as both 33 = 3*11 and 35 = 5*7 are odd nonsquare semiprimes, thus A336158 gives equal values for them, and also A347385(33) = A001615(33) = A347385(35) = A001615(35) = 48.

Antti Karttunen, Table of n, a(n) for n = 1..65537

Cf. A000265, A001615, A003602, A046523, A336158, A351035.
Differs from A347374 for the first time at n=103, where a(103) = 48, while A347374(103) = 30.
Differs from A351036 for the first time at n=175, where a(175) = 78, while A351036(175) = 80.

up_to = 65537;
rgs_transform(invec) = { my(om = Map(), outvec = vector(length(invec)), u=1); for(i=1, length(invec), if(mapisdefined(om,invec[i]), my(pp = mapget(om, invec[i])); outvec[i] = outvec[pp] , mapput(om,invec[i],i); outvec[i] = u; u++ )); outvec; };
A000265(n) = (n>>valuation(n,2));
A046523(n) = { my(f=vecsort(factor(n)[, 2], , 4), p); prod(i=1, #f, (p=nextprime(p+1))^f[i]); };  \\ From A046523
A336158(n) = A046523(A000265(n));
A347385(n) = if(1==n,n, my(f=factor(n>>valuation(n, 2))); prod(i=1, #f~, f[i, 1]^f[i, 2] + f[i, 1]^(f[i, 2]-1)));
Aux351035(n) = [A347385(n), A336158(n)];
v351035 = rgs_transform(vector(up_to, n, Aux351035(n)));
A351035(n) = v351035[n];

A351036 Lexicographically earliest infinite sequence such that a(i) = a(j) => A000593(i) = A000593(j) and A336158(i) = A336158(j), for all i, j >= 1.

Original entry on oeis.org

1, 1, 2, 1, 3, 2, 4, 1, 5, 3, 6, 2, 7, 4, 8, 1, 9, 5, 10, 3, 11, 6, 12, 2, 13, 7, 14, 4, 15, 8, 16, 1, 17, 9, 17, 5, 18, 10, 19, 3, 20, 11, 21, 6, 22, 12, 23, 2, 24, 13, 25, 7, 26, 14, 25, 4, 27, 15, 28, 8, 29, 16, 30, 1, 31, 17, 32, 9, 33, 17, 34, 5, 35, 18, 36, 10, 33, 19, 37, 3, 38, 20, 39, 11, 40, 21, 41, 6, 42

Offset: 1

Antti Karttunen, Jan 30 2022

Restricted growth sequence transform of the ordered pair [A000593(n), A336158(n)], where A000593(n) is the sum of odd divisors of n, and A336158(n) is the least representative of the prime signature of the odd part of n.
For all i, j:
  A003602(i) = A003602(j) => A351040(i) = A351040(j) => a(i) = a(j),
  a(i) = a(j) => A113415(i) = A113415(j).

Antti Karttunen, Table of n, a(n) for n = 1..65537

Cf. A000265, A000593, A003602, A046523, A113415, A336158.
Cf. also A351037.
Differs from A347374 for the first time at n=103, where a(103) = 48, while A347374(103) = 30.
Differs from A351035 for the first time at n=175, where a(175) = 80, while A351035(175) = 78.
Differs from A351040 for the first time at n=637, where a(637) = 261, while A351040(637) = 272.

up_to = 65537;
rgs_transform(invec) = { my(om = Map(), outvec = vector(length(invec)), u=1); for(i=1, length(invec), if(mapisdefined(om,invec[i]), my(pp = mapget(om, invec[i])); outvec[i] = outvec[pp] , mapput(om,invec[i],i); outvec[i] = u; u++ )); outvec; };
A000265(n) = (n>>valuation(n,2));
A046523(n) = { my(f=vecsort(factor(n)[, 2], , 4), p); prod(i=1, #f, (p=nextprime(p+1))^f[i]); };  \\ From A046523
A336158(n) = A046523(A000265(n));
A000593(n) = sigma(A000265(n));
Aux351036(n) = [A000593(n), A336158(n)];
v351036 = rgs_transform(vector(up_to, n, Aux351036(n)));
A351036(n) = v351036[n];

A365392 Lexicographically earliest infinite sequence such that a(i) = a(j) => f(i) = f(j) for all i, j >= 1, where f(n) = [A336158(n), A364255(n), A365425(n)].

Original entry on oeis.org

1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 5, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 10, 5, 21, 22, 23, 24, 25, 12, 26, 7, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 19, 39, 10, 5, 40, 41, 42, 43, 44, 45, 46, 47, 48, 20, 23, 12, 49, 12, 13, 50, 51, 52, 53, 54, 55, 56, 57, 16, 58, 59, 60, 61, 62, 63, 64, 18, 65, 66, 67, 36

Offset: 1

Antti Karttunen, Sep 04 2023

Restricted growth sequence transform of triplet [A336158(n), A364255(n), A365425(n)].
For all i, j >= 1:
  a(i) = a(j) => A286531(i) = A286531(j),
  a(i) = a(j) => A305891(i) = A305891(j),
  a(i) = a(j) => A365391(i) = A365391(j),
  a(i) = a(j) => A365421(i) = A365421(j).

Antti Karttunen, Table of n, a(n) for n = 1..65537

Cf. A000265, A046523, A163511, A286531, A305891, A336158, A364255, A365425, A365391, A365421.

up_to = 65537;
rgs_transform(invec) = { my(om = Map(), outvec = vector(length(invec)), u=1); for(i=1, length(invec), if(mapisdefined(om,invec[i]), my(pp = mapget(om, invec[i])); outvec[i] = outvec[pp] , mapput(om,invec[i],i); outvec[i] = u; u++ )); outvec; };
A000265(n) = (n>>valuation(n,2));
A046523(n) = { my(f=vecsort(factor(n)[, 2], , 4), p); prod(i=1, #f, (p=nextprime(p+1))^f[i]); }; \\ From A046523
A163511(n) = if(!n, 1, my(p=2, t=1); while(n>1, if(!(n%2), (t*=p), p=nextprime(1+p)); n >>= 1); (t*p));
A364255(n) = gcd(n, A163511(n));
A365392aux(n) = [A364255(n), A046523(A000265(n)), A046523(A000265(A163511(n)))];
v365392 = rgs_transform(vector(up_to,n,A365392aux(n)));
A365392(n) = v365392[n];

A336157 Lexicographically earliest infinite sequence such that a(i) = a(j) => A318458(i) = A318458(j) and A336158(i) = A336158(j), for all i, j >= 1.

Original entry on oeis.org

1, 1, 2, 1, 2, 3, 2, 1, 4, 5, 2, 6, 2, 7, 8, 1, 2, 9, 2, 10, 11, 3, 2, 6, 4, 12, 13, 14, 2, 15, 2, 1, 11, 6, 11, 16, 2, 3, 11, 17, 2, 18, 2, 19, 20, 7, 2, 6, 4, 21, 22, 23, 2, 24, 22, 6, 22, 17, 2, 25, 2, 26, 27, 1, 11, 28, 2, 6, 11, 28, 2, 29, 2, 5, 30, 31, 11, 32, 2, 31, 33, 6, 2, 34, 35, 3, 11, 36, 2, 37, 22, 38, 11, 39, 40, 6, 2, 41, 20, 42, 2, 43, 2, 44, 45

Offset: 1

Antti Karttunen, Jul 11 2020

nonn

Restricted growth sequence transform of the ordered pair [A318458(n), A336158(n)].
For all i, j:
  A324400(i) = A324400(j) => a(i) = a(j).
  A324401(i) = A324401(j) => a(i) = a(j).

Antti Karttunen, Table of n, a(n) for n = 1..65537

Cf. A000265, A046523, A318458, A324400, A324401, A336158.

Cf. A324389, A324530, A324531, A324532 for other similar constructions (also similar by their scatter plots).

up_to = 65537;
rgs_transform(invec) = { my(om = Map(), outvec = vector(length(invec)), u=1); for(i=1, length(invec), if(mapisdefined(om,invec[i]), my(pp = mapget(om, invec[i])); outvec[i] = outvec[pp] , mapput(om,invec[i],i); outvec[i] = u; u++ )); outvec; };
A000265(n) = (n>>valuation(n,2));
A046523(n) = { my(f=vecsort(factor(n)[, 2], , 4), p); prod(i=1, #f, (p=nextprime(p+1))^f[i]); };  \\ From A046523
A336158(n) = A046523(A000265(n));
A318458(n) = bitand(n, sigma(n)-n);
Aux336157(n) = [A318458(n), A336158(n)];
v336157 = rgs_transform(vector(up_to, n, Aux336157(n)));
A336157(n) = v336157[n];

A366790 Lexicographically earliest infinite sequence such that a(i) = a(j) => A366789(i) = A366789(j) and A336158(i) = A336158(j), for all i, j >= 1.

Original entry on oeis.org

1, 1, 2, 1, 3, 2, 2, 1, 4, 3, 5, 2, 3, 2, 6, 1, 7, 4, 2, 3, 8, 5, 9, 2, 10, 3, 11, 2, 5, 6, 12, 1, 13, 7, 6, 4, 3, 2, 6, 3, 14, 8, 7, 5, 15, 9, 16, 2, 4, 10, 17, 3, 2, 11, 18, 2, 8, 5, 19, 6, 9, 12, 20, 1, 21, 13, 22, 7, 21, 6, 5, 4, 23, 3, 24, 2, 13, 6, 12, 3, 25, 14, 26, 8, 27, 7, 13, 5, 3, 15, 6, 9, 28, 16, 6, 2, 29, 4

Offset: 1

Antti Karttunen, Oct 23 2023

nonn

Restricted growth sequence transform of the ordered pair [A366789(n), A336158(n)].
For all i, j:
  A003602(i) = A003602(j) => a(i) = a(j) => A366388(i) = A366388(j).

Antti Karttunen, Table of n, a(n) for n = 1..65537

Cf. A003602, A336158, A366388, A366789, A366792.

Cf. also A336390, A336470.

up_to = 65537;
rgs_transform(invec) = { my(om = Map(), outvec = vector(length(invec)), u=1); for(i=1, length(invec), if(mapisdefined(om,invec[i]), my(pp = mapget(om, invec[i])); outvec[i] = outvec[pp] , mapput(om,invec[i],i); outvec[i] = u; u++ )); outvec; };
A000265(n) = (n>>valuation(n,2));
A366789(n) = { my(f=factor(n)); prod(k=1, #f~, A000265(primepi(f[k, 1]))^f[k, 2]); };
A046523(n) = { my(f=vecsort(factor(n)[, 2], , 4), p); prod(i=1, #f, (p=nextprime(p+1))^f[i]); };  \\ From A046523
A336158(n) = A046523(A000265(n));
Aux366790(n) = [A366789(n), A336158(n)];
v366790 = rgs_transform(vector(up_to, n, Aux366790(n)));
A366790(n) = v366790[n];

A336920 Lexicographically earliest infinite sequence such that a(i) = a(j) => f(i) = f(j), where f(n) = [A329697(n), A331410(n), A336158(n)], for all i, j >= 1.

Original entry on oeis.org

1, 1, 2, 1, 3, 2, 4, 1, 5, 3, 6, 2, 6, 4, 7, 1, 8, 5, 9, 3, 10, 6, 11, 2, 12, 6, 13, 4, 14, 7, 15, 1, 16, 8, 16, 5, 14, 9, 16, 3, 17, 10, 18, 6, 19, 11, 20, 2, 21, 12, 22, 6, 14, 13, 23, 4, 24, 14, 25, 7, 11, 15, 26, 1, 23, 16, 25, 8, 27, 16, 18, 5, 28, 14, 29, 9, 27, 16, 18, 3, 30, 17, 9, 10, 31, 18, 32, 6, 28, 19, 27, 11, 33, 20, 32, 2, 17, 21, 34, 12, 28, 22, 9, 6, 35

Offset: 1

Antti Karttunen, Aug 10 2020

nonn

Restricted growth sequence transform of the triplet [A329697(n), A331410(n), A336158(n)].
For all i, j:
  A324400(i) = A324400(j) => A003602(i) = A003602(j) => a(i) = a(j),
  a(i) = a(j) => A335880(i) = A335880(j),
  a(i) = a(j) => A336391(i) = A336391(j),
  a(i) = a(j) => A336471(i) = A336471(j).

Antti Karttunen, Table of n, a(n) for n = 1..65537

Cf. A000265, A003602, A324400, A329697, A331410, A335880, A336391, A336471.

up_to = 65537;
rgs_transform(invec) = { my(om = Map(), outvec = vector(length(invec)), u=1); for(i=1, length(invec), if(mapisdefined(om,invec[i]), my(pp = mapget(om, invec[i])); outvec[i] = outvec[pp] , mapput(om,invec[i],i); outvec[i] = u; u++ )); outvec; };
A000265(n) = (n>>valuation(n,2));
A046523(n) = { my(f=vecsort(factor(n)[, 2], , 4), p); prod(i=1, #f, (p=nextprime(p+1))^f[i]); };  \\ From A046523
A336158(n) = A046523(A000265(n));
A329697(n) = if(!bitand(n,n-1),0,1+A329697(n-(n/vecmax(factor(n)[, 1]))));
A331410(n) = if(!bitand(n,n-1),0,1+A331410(n+(n/vecmax(factor(n)[, 1]))));
Aux336920(n) = [A329697(n), A331410(n), A336158(n)];
v336920 = rgs_transform(vector(up_to, n, Aux336920(n)));
A336920(n) = v336920[n];

A365391 Lexicographically earliest infinite sequence such that a(i) = a(j) => A336158(i) = A336158(j) and A365425(i) = A365425(j) for all i, j >= 1.

Original entry on oeis.org

1, 1, 2, 1, 3, 2, 2, 1, 4, 3, 3, 2, 5, 2, 6, 1, 7, 4, 8, 3, 9, 3, 3, 2, 10, 5, 11, 2, 5, 6, 2, 1, 12, 7, 13, 4, 14, 8, 15, 3, 16, 9, 17, 3, 18, 3, 3, 2, 19, 10, 9, 5, 20, 11, 21, 2, 9, 5, 5, 6, 5, 2, 22, 1, 23, 12, 24, 7, 25, 13, 7, 4, 26, 14, 27, 8, 28, 15, 8, 3, 29, 16, 16, 9, 30, 17, 9, 3, 16, 18, 9, 3, 9, 3, 31, 2

Offset: 1

Antti Karttunen, Sep 03 2023

Restricted growth sequence transform of the ordered pair [A336158(n), A365425(n)].
For all i, j:
  A003602(i) = A003602(j) => a(i) = a(j),
  A365392(i) = A365392(j) => a(i) = a(j).

Antti Karttunen, Table of n, a(n) for n = 1..65537

Cf. A000265, A003602, A046523, A163511, A336158, A365425, A365392.

Cf. also A286531, A336159.

up_to = 65537;
rgs_transform(invec) = { my(om = Map(), outvec = vector(length(invec)), u=1); for(i=1, length(invec), if(mapisdefined(om,invec[i]), my(pp = mapget(om, invec[i])); outvec[i] = outvec[pp] , mapput(om,invec[i],i); outvec[i] = u; u++ )); outvec; };
A000265(n) = (n>>valuation(n,2));
A046523(n) = { my(f=vecsort(factor(n)[, 2], , 4), p); prod(i=1, #f, (p=nextprime(p+1))^f[i]); }; \\ From A046523
A163511(n) = if(!n, 1, my(p=2, t=1); while(n>1, if(!(n%2), (t*=p), p=nextprime(1+p)); n >>= 1); (t*p));
A365391aux(n) = [A046523(A000265(n)), A046523(A000265(A163511(n)))];
v365391 = rgs_transform(vector(up_to,n,A365391aux(n)));
A365391(n) = v365391[n];

A366380 Lexicographically earliest infinite sequence such that a(i) = a(j) => A336158(i) = A336158(j), A336466(i) = A336466(j) and A336467(i) = A336467(j) for all i, j >= 1, where A336466 is fully multiplicative with a(p) = oddpart(p-1) for any prime p and A336467 is fully multiplicative with a(2) = 1 and a(p) = oddpart(p+1) for odd primes, and A336158(n) gives the prime signature of the odd part of n.

Original entry on oeis.org

1, 1, 2, 1, 3, 2, 4, 1, 5, 3, 6, 2, 7, 4, 8, 1, 9, 5, 10, 3, 11, 6, 12, 2, 13, 7, 14, 4, 15, 8, 16, 1, 17, 9, 18, 5, 19, 10, 20, 3, 21, 11, 22, 6, 23, 12, 24, 2, 25, 13, 26, 7, 27, 14, 28, 4, 29, 15, 30, 8, 31, 16, 32, 1, 33, 17, 34, 9, 35, 18, 36, 5, 37, 19, 38, 10, 39, 20, 40, 3, 41, 21, 42, 11, 43, 22, 44, 6, 45, 23, 46, 12, 47, 24, 48, 2, 49, 25, 50

Offset: 1

Antti Karttunen, Oct 12 2023

nonn

Restricted growth sequence transform of the triplet [A336158(n), A336466(n), A336467(n)].
For all i, j >= 1:
  A003602(i) = A003602(j) => a(i) = a(j),
  a(i) = a(j) => A366381(i) = A366381(j),
  a(i) = a(j) => A335880(i) = A335880(j),
  a(i) = a(j) => A336390(i) = A336390(j),
  a(i) = a(j) => A336470(i) = A336470(j).

Antti Karttunen, Table of n, a(n) for n = 1..65537

Cf. A000265, A003602, A335880, A336158, A336466, A336467, A336470, A336390, A366381.
Differs from A003602 and A351090 for the first time at n=153, where a(153) = 38, while A003602(153) = A351090(153) = 77.
Differs from A365388 for the first time at n=99, where a(99) = 50, while A365388(99) = 41.

up_to = 65537;
rgs_transform(invec) = { my(om = Map(), outvec = vector(length(invec)), u=1); for(i=1, length(invec), if(mapisdefined(om,invec[i]), my(pp = mapget(om, invec[i])); outvec[i] = outvec[pp] , mapput(om,invec[i],i); outvec[i] = u; u++ )); outvec; };
A000265(n) = (n>>valuation(n,2));
A046523(n) = { my(f=vecsort(factor(n)[, 2], , 4), p); prod(i=1, #f, (p=nextprime(p+1))^f[i]); };  \\ From A046523
A336158(n) = A046523(A000265(n));
A336466(n) = { my(f=factor(n)); prod(k=1, #f~, A000265(f[k, 1]-1)^f[k, 2]); };
A336467(n) = { my(f=factor(n)); prod(k=1,#f~,if(2==f[k,1],1,(A000265(f[k,1]+1))^f[k,2])); };
A366380aux(n) = [A336158(n), A336466(n), A336467(n)];
v366380 = rgs_transform(vector(up_to,n,A366380aux(n)));
A366380(n) = v366380[n];

A365425 The least number with the prime signature of the odd part of A163511(n): a(n) = A046523(A000265(A163511(n))).

Original entry on oeis.org

1, 1, 1, 2, 1, 4, 2, 2, 1, 8, 4, 4, 2, 6, 2, 2, 1, 16, 8, 8, 4, 12, 4, 4, 2, 12, 6, 6, 2, 6, 2, 2, 1, 32, 16, 16, 8, 24, 8, 8, 4, 36, 12, 12, 4, 12, 4, 4, 2, 24, 12, 12, 6, 30, 6, 6, 2, 12, 6, 6, 2, 6, 2, 2, 1, 64, 32, 32, 16, 48, 16, 16, 8, 72, 24, 24, 8, 24, 8, 8, 4, 72, 36, 36, 12, 60, 12, 12, 4, 36, 12, 12, 4, 12, 4, 4, 2

Offset: 0

Antti Karttunen, Sep 03 2023

nonn

Antti Karttunen, Table of n, a(n) for n = 0..16385

Cf. A000265, A046523, A064989, A163511, A336158.

Cf. also A278531.

A000265(n) = (n>>valuation(n,2));
A046523(n) = { my(f=vecsort(factor(n)[, 2], , 4), p); prod(i=1, #f, (p=nextprime(p+1))^f[i]); }; \\ From A046523
A163511(n) = if(!n, 1, my(p=2, t=1); while(n>1, if(!(n%2), (t*=p), p=nextprime(1+p)); n >>= 1); (t*p));
A365425(n) = A046523(A000265(A163511(n)));

a(n) = A336158(A163511(n)) = A046523(A064989(A163511(n))).

For all n >= 1, a(n) = a(2*n) = a(A000265(n)).

cp's OEIS Frontend

A336934 Lexicographically earliest infinite sequence such that a(i) = a(j) => A007733(i) = A007733(j) and A336158(i) = A336158(j), for all i, j >= 1.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

PARI

A351035 Lexicographically earliest infinite sequence such that a(i) = a(j) => A347385(i) = A347385(j) and A336158(i) = A336158(j), for all i, j >= 1.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

PARI

A351036 Lexicographically earliest infinite sequence such that a(i) = a(j) => A000593(i) = A000593(j) and A336158(i) = A336158(j), for all i, j >= 1.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

PARI

A365392 Lexicographically earliest infinite sequence such that a(i) = a(j) => f(i) = f(j) for all i, j >= 1, where f(n) = [A336158(n), A364255(n), A365425(n)].

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

PARI

A336157 Lexicographically earliest infinite sequence such that a(i) = a(j) => A318458(i) = A318458(j) and A336158(i) = A336158(j), for all i, j >= 1.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

PARI

A366790 Lexicographically earliest infinite sequence such that a(i) = a(j) => A366789(i) = A366789(j) and A336158(i) = A336158(j), for all i, j >= 1.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

PARI

A336920 Lexicographically earliest infinite sequence such that a(i) = a(j) => f(i) = f(j), where f(n) = [A329697(n), A331410(n), A336158(n)], for all i, j >= 1.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

PARI

A365391 Lexicographically earliest infinite sequence such that a(i) = a(j) => A336158(i) = A336158(j) and A365425(i) = A365425(j) for all i, j >= 1.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

PARI

Views

Author

Keywords

Comments

Links

Crossrefs