/R/Painter-class.R
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