A140175 - OEIS

This site is supported by donations to The OEIS Foundation.

A140175

Numbers n such that n=prime((d_1*d_2*...*d_k)*(d_1+d_2+...+d_k)) where d_1d_2...d_k is the decimal expansion of n.

4621, 34361, 2881861, 63882851 (list; graph; refs; listen; history; internal format)

	OFFSET	`1,1`
	EXAMPLE	`63882851=prime((63882851)(6+3+8+8+2+8+5+1)).`
	MATHEMATICA	`fQ[n_] := Block[{id = IntegerDigits@ n}, n == Prime[Plus @@ id Times @@ id]]; k = 1; lst = {}; While[ k < 10^8, If[ fQ@n, AppendTo[lst, k]; Print@ n]; k++ ]; lst (* RGWv *)`
	CROSSREFS	`Cf. A097223.` `Sequence in context: A108009 A189983 A051649 * A116226 A115446 A139410` `Adjacent sequences: A140172 A140173 A140174 * A140176 A140177 A140178`
	KEYWORD	`base,nonn`
	AUTHOR	`Farideh Firoozbakht (mymontain(AT)yahoo.com), Jun 09 2008`

Content is available under The OEIS End-User License Agreement .

Last modified February 17 11:46 EST 2012. Contains 206011 sequences.