id:A076763 - OEIS Search Results

Search: id:A076763

Displaying 1-1 of 1 results found.

page 1

1-apexes of omega: n such that omega(n-1) < omega(n) > omega(n+1), where omega(m) = the number of distinct prime factors of m.

+0
1

6, 10, 12, 18, 24, 26, 28, 30, 42, 48, 60, 66, 70, 72, 78, 80, 82, 84, 90, 102, 105, 108, 110, 114, 120, 126, 130, 132, 138, 140, 150, 154, 156, 165, 168, 170, 174, 180, 182, 186, 190, 192, 195, 198, 204, 210, 220, 222, 228, 234, 238, 240, 242, 246, 252, 255 (list; graph; listen)

	OFFSET	`1,1`
	COMMENT	`I call n a "k-apex" (or "apex of height k") of the arithmetical function f if n satisfies f(n-k) < ... < f(n-1) < f(n) > f(n+1) > .... > f(n+k).`
	MATHEMATICA	`omega[n_] := Length[FactorInteger[n]]; Select[Range[3, 500], omega[ # - 1] < omega[ # ] > omega[ # + 1] &]`
	CROSSREFS	`Cf. A001222.` `Sequence in context: A114520 A046288 A101933 this_sequence A064712 A098669 A046363` `Adjacent sequences: A076760 A076761 A076762 this_sequence A076764 A076765 A076766`
	KEYWORD	`nonn`
	AUTHOR	`Joseph L. Pe (joseph_l_pe(AT)hotmail.com), Nov 13 2002`

page 1

Search completed in 0.002 seconds

Last modified July 26 23:19 EDT 2008. Contains 142293 sequences.

AT&T Labs Research