编辑
经核准的
T.D.Noe，<a href=“/A072209号/b072209.txt“>n表，n为a（n）==1..10万</a>
检验过的
提出
a（n）)=) =φ[(φ{(A033948号（n个）)}].))).
囊性纤维变性。A033948号,A046144号.
1, 1, 1, 1, 2, 1, 2, 2, 2, 4, 4, 2, 8, 2, 6, 4, 10, 8, 4, 6, 12, 8, 8, 12, 6, 16, 12, 10, 22, 12, 8, 24, 6, 12, 28, 16, 8, 20, 24, 24, 12, 24, 18, 16,40,12, 40,22,32, 12,40,32,24,52,36,48,28,40,16,40,36,48,20,64,44,24,24,72, 40,48,24,18,54
（PARI）是（n）=如果（n%2，isprimepower（n）||n==1，n=2=|n=4||（isprimepower（n/2，-n）&&n>2））；
lista（nn）=对于（n=1，nn，如果（是（n），打印1（eulerphi（euleerphi（n）），“，”））\\米歇尔·马库斯2017年5月12日
收获[Do[If[n==1，Sow[1]，If[IntegerQ[PrimitiveRoot[n]]，Sow[EulerPhi[Euler Phi[n]]]，{n，1，100}]][[2，1]] (*发件人 ]] (* _Jean-François Alcover公司,_,2012年2月24日*）
OEIS服务器: https://oeis.org/edit/global/2066
_Lekraj Beedassy公司(布尔克拉(自动变速箱)雅虎.通用域名格式),_,2002年7月3日
OEIS服务器: https://oeis.org/edit/global/489
