OFFSET
1,1
COMMENTS
As only square numbers have an odd number of divisors, for odd k, A005179(k) is usually larger than either A005179(k-1) or A005179(k+1) (or both). This sequence lists the exceptions. There are 71 terms below 10^3, 963 terms below 10^4, 11179 terms below 10^5. It seems that the density of this sequence over all the odd numbers is > 0.2.
LINKS
Jianing Song, Table of n, a(n) for n = 1..11179 (all terms below 10^5)
EXAMPLE
MAPLE
A := [seq(A005179(n), n=1..800)];
isA := k -> k::odd and A[k] < A[k-1] and A[k] < A[k+1]:
select(isA, [$3..799]); # Peter Luschny, Oct 30 2019
PROG
(PARI) isA328897(k) = (k%2&&k>1) && A005179(k)<A005179(k-1) && A005179(k)<A005179(k+1) \\ Corrected by Jianing Song, Dec 05 2021
CROSSREFS
KEYWORD
nonn
AUTHOR
Jianing Song, Oct 30 2019
STATUS
approved