Would appreciate if someone could give me a clue on how to use r for it with this simple data:

Dose Subject Response

1 20 0

10 20 3

100 19 17

1000 20 18

tsk( c(1, 10, 100, 1000), 20, c(0, 3, 17, 20) )

dr <- data.frame( x=c(1, 10, 100, 1000), n=c(20, 20, 19, 20),

r=c(0, 3, 17, 18) )

tsk( dr, 0, 0.1, 0.99 )

data(hamilton)

tsk(hamilton$dr1a)

hamilton: Example dose-response curves from Hamilton (1977)

tsk: Trimmed Spearman-Karber Method

Thank you.