A373211 Signature sequence of Pi^2.

1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 1, 11, 2, 12, 3, 13, 4, 14, 5, 15, 6, 16, 7, 17, 8, 18, 9, 19, 10, 20, 1, 11, 21, 2, 12, 22, 3, 13, 23, 4, 14, 24, 5, 15, 25, 6, 16, 26, 7, 17, 27, 8, 18, 28, 9, 19, 29, 10, 20, 30, 1, 11, 21, 31, 2, 12, 22, 32, 3, 13, 23, 33, 4, 14, 24, 34, 5, 15, 25, 35, 6, 16, 26, 36, 7, 17, 27, 37

Offset

1,2

Comments

Signature sequence of x = A002388: defined by sorting the values of i+j*x, i,j>=1, and collecting the list of the i in that order.

Links

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

Index entries for sequences related to signature sequences

Maple

SIGSEQsort := proc(l1::list, l2::list)
    if op(1, l1) < op(1, l2) then
        return true ;
    else
        return false ;
    end if
end proc:
SIGSEQ := proc(x, vmax)
    local TBsrtd, i, j ;
    TBsrtd := [] ;
    for i from 1 do
        if i > vmax then
            break ;
        end if;
        for j from 1 do
            if evalf(i+j*x) > vmax then
                break ;
            end if;
            TBsrtd := [op(TBsrtd), [evalf(i+j*x), i]] ;
        end do:
    end do:
    sort(TBsrtd, SIGSEQsort) ;
    [seq(op(2, v), v=%)] ;
end proc:
Digits := 100 ;
SIGSEQ(Pi^2, 150.0) ;

Crossrefs

Cf. A002388.

Sequence in context: A214949 A067453 A203814 * A346393 A360074 A280505

Adjacent sequences: A373208 A373209 A373210 * A373212 A373213 A373214

Keyword

nonn

Author

R. J. Mathar, May 28 2024

Status

approved