A300957 Fixed points of A300955.
1, 5, 6, 7, 11, 13, 17, 19, 23, 29, 30, 31, 35, 37, 41, 42, 43, 47, 53, 55, 59, 61, 65, 66, 67, 71, 72, 73, 77, 78, 79, 83, 85, 89, 91, 95, 97, 101, 102, 103, 107, 108, 109, 113, 114, 115, 119, 127, 131, 133, 137, 138, 139, 143, 145, 149, 151, 155, 157, 161
Offset: 1
Keywords
Examples
A300955(42) = 42 hence 42 belongs to this sequence.
Programs
-
Maple
b:= n-> `if`(n=1, 1, mul(`if`(i[1]=2, 3, `if`(i[1]=3, 2, i[1]))^b(i[2]), i=ifactors(n)[2])): select(n-> n=b(n), [$1..200])[]; # Alois P. Heinz, Mar 17 2018
Comments