PageRenderTime 14ms CodeModel.GetById 13ms app.highlight 0ms RepoModel.GetById 1ms app.codeStats 0ms

/R/Painter-class.R

http://github.com/tengfei/visnab
R | 16 lines | 2 code | 0 blank | 14 comment | 0 complexity | 27684dfd001ff02c49b3a0d73a9faf18 MD5 | raw file
 1######################################################################
 2##  Class "Painter"
 3######################################################################
 4VisnabPainter.gen <- setRefClass("VisnabPainter",
 5                                 fields = list(zoomLevel = "numeric"))
 6## accesors
 7## addLayer
 8## Should have the ability to
 9## 1. Transform automatically when the layer is added(limits)
10##    compute limits itself, then compare limits to it's parent,
11##    basically most time, it's object's rootLayer.
12##    So the assumption here is that:
13##    1) we transform them on the same scale
14##    2) 
15## 2. How to add events?
16## assume it has extra column to store the color