|
|
A173946
|
|
Numbers n such that omega(lambda(n)) = lambda(omega(n)).
|
|
1
|
|
|
1, 3, 4, 5, 6, 8, 10, 12, 15, 16, 17, 20, 24, 32, 34, 40, 42, 48, 51, 64, 66, 68, 70, 78, 80, 84, 85, 90, 96, 105, 110, 114, 126, 128, 130, 132, 136, 138, 140, 150, 156, 160, 165, 168, 174, 180, 182, 190, 192, 195, 210, 220, 222, 228, 230, 234, 238, 246
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
174 is in the sequence because omega(lambda(174)) = omega(28) = 2 , lambda(omega(174))
= lambda(3) = 2.
|
|
MAPLE
|
with(numtheory): for n from 1 to 250 do:if nops(factorset(lambda(n)))= lambda(nops(factorset(n)))then printf(`%d, `, n):else fi:od:
|
|
MATHEMATICA
|
Cases[Range[1000], k_ /; Length[FactorInteger[CarmichaelLambda[k]]] == CarmichaelLambda[Length[FactorInteger [k]]]]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|