locateArrowText: locateArrowText
In twMisc: Utility functions of tw

Description Usage Arguments Value Author(s) Examples

generate Arrow and Label positions source code for plotArrowText

1	locateArrowText(nLabel = 1, digits = 2, ...)

`nLabel`	number of labels to generate
`digits`	number of digits to round position to
`...`	further arguments to `write.table`

string source code to be pasted into plotArrowText command.

Thomas Wutzler

isInteractiveAllowed <- FALSE
if( isInteractiveAllowed ){
    plot(sin(1:10),type="l")
    tmp <- locateArrowText(2)  # paste the result into the following command (second line) 
    plotArrowText(c("Here is one label.","And another.")
        # this line is pasted from clipboard
        ,X=c(3.48, 7.9),Y=c(0.59, -0.45),x=c(2.53, 6.22),y=c(0.5, -0.06)    
        ,adj=c(1,0))
}