inst/App/templates/ptRTemplate.R

library(svgR)
library(tidyverse)
WH<-c(500,350)

# Defined by mouse: edit with care!
ptR<-list(
  x=tribble(
    ~points,
    matrix(0,2,0)
  )
)

svgR(wh=WH,
     #your custom code goes here
     NULL
)
mslegrand/pointR documentation built on July 4, 2022, 9:57 p.m.