1,1

Larger terms of this sequence were calculated by Giovanni Resta (g.resta AT iit.cnr.it) and Farideh Firoozbakht (mymontain AT yahoo.com). This sequence is a subsequence of A083360 (Subsequence of sequence A083359 in which factors do not overlap in the number), which is a subsequence of A083359 (Visible Factor Numbers, or VPNs: numbers n with the property that every prime factor of n can be found in the decimal expansion of n, and every digit of n can be found in a prime factor. No additional 0's and 1's are allowed). Also, this sequence is a subsequence of A096595 (Numbers n with the property that n is an anagram of the digits of the distinct prime factors of n).

For example: 735 = 3*5*7^2, and 3792 = 2^4*3*79.

fQ[n_] := !PrimeQ@n && MemberQ[ FromDigits /@ (Flatten@# & /@ IntegerDigits[ Permutations[ First /@ FactorInteger@n]]), n]; Do[ If[fQ@n, Print@n], {n, 10^7/4}] (* Robert G. Wilson v Sep 02 2006 *)

Cf. A083359, A083360, A083361, A096595.

Sequence in context: A096595 A083359 A083360 this_sequence A067866 A004078 A043633

Adjacent sequences: A121339 A121340 A121341 this_sequence A121343 A121344 A121345

base,nonn

Tanya Khovanova (tanyakh(AT)yahoo.com), Aug 28 2006