preview

See live at: https://excalidraw.com/#json=6574685261135872,GxSfukqmhssGOdgZvNhG-g

Usage 

library(minixcali)

d <- Excali_doc()
shape <- xkd_rectangle(width = 300, height=200,
                       fillStyle = 'hachure', roughness = 2)
d$add(shape)
d$export(file = file.path(tempdir(), 'output.json'))

Imported into Excalidraw: https://excalidraw.com/#json=5715677440638976,p-zr2_oejToaWyr7Slr44w

preview

Acknowledgments

  • Excalidraw for this cool & open interactive tool

  • {minisvg} by @coolbutuseless — the R6 model was too complicated for me to copy properly so I settled for a dumb list structure ¯\_(ツ)_/¯

  • {jsonlite} to import/export R objects to JSON

  • {purrr}, {tibble}, {glue} for making the initial digressions in development somewhat less terrible

  • {svgchop} by @brodieG to import SVG paths

  • {flametree} for providing a pretty example to play with

  • ln (golang) for cool SVGs to import

  • poorlydrawnlines for Kevin and Roberto

  • {isoband} to melt Excalidraw with volcanos

  • {gridfont} by @coolbutuseless, to draw text as single line strokes

  • {excalidrawr} by @timelyportfolio for the experimental Shiny wrapper around Excalidraw’s React component (hopefully this will help provide a live-preview)