A090661 - OEIS

A090661

Numbers n such that prevprime(n!) - n*prevprime((n-1)!) < 0.

5, 8, 13, 15, 31, 34, 39, 95, 167, 325, 380, 470, 547

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

Table of n, a(n) for n=1..13.

MATHEMATICA

PrevPrim[ n_ ] := Block[ {k = n - 1}, While[ !PrimeQ[ k ], k-- ]; k ]; Select[ Range[ 275 ], PrevPrim[ #! ] - #*PrevPrim[ (# - 1)! ] < 0 & ] (* Robert G. Wilson v *)

CROSSREFS

Cf. A090660.

Sequence in context: A263263 A314420 A030606 * A214976 A047615 A314421

Adjacent sequences: A090658 A090659 A090660 * A090662 A090663 A090664

KEYWORD

nonn

AUTHOR

Mohammed Bouayoun (bouyao(AT)wanadoo.fr), Dec 15 2003

EXTENSIONS

More terms from Robert G. Wilson v, Dec 20 2003

STATUS

approved