A147624 Numbers n = concat(a,b) such that omega(n) = omega(a) * omega(b), where omega = A001221.

23, 25, 26, 27, 29, 32, 36, 37, 43, 46, 47, 49, 53, 56, 59, 62, 63, 65, 68, 69, 73, 76, 79, 83, 86, 89, 96, 97, 104, 108, 113, 116, 122, 123, 124, 129, 136, 137, 139, 142, 143, 144, 145, 147, 148, 152, 153, 155, 158, 159, 163, 166, 167, 169, 173, 176, 179, 183, 184

Offset: 1

Author

M. F. Hasler, Nov 08 2008

Keywords

• base
• easy
• nonn

Comments

Concat(a,b) means decimal concatenation of a and b, i.e., a*10^[log[10](b)+1] + b, since we don't allow leading zeros in b.

Examples

			a(1)=23 is in the sequence since omega(23) = 1 = 1*1 = omega(2)*omega(3).
307 is not in this sequence although omega(307) = 1 = 1*1 = omega(3)*omega(07), since we don't allow leading zeros in the second part b.
		

Crossrefs

Cf. A001221, A147616 (analog for sigma), A147619 (analog for eulerphi), A147627 (analog for bigomega).

Programs

PARI

is_A147624(n)={ local(p=1, o=omega(n)); while( n>p*=10, n%p*10
A147624(n) & print1(n","))