%I #6 Dec 19 2022 18:04:13
%S 1,4,13,11,19,31,49,41,35,55,85,16,14,43,20,61,29,17
%N a(n+1)=sopfr(3a(n)+1), with sopfr=A001414. Finishes with 17 (fixed point).
%C In the class of recurrence sequences a(n+1)=sopfr(C*a(n)+D), with C=3, D=1.
%F a(n+1)=A001414(3*a(n)+1)
%t See A136136
%t Most[FixedPointList[Total[Times@@@FactorInteger[3#+1]]&,1]] (* _Harvey P. Dale_, Dec 19 2022 *)
%K fini,nonn
%O 1,2
%A _Carlos Alves_, Dec 16 2007