/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. 

  2. ##  Class "Painter"
    3. 

  3. ######################################################################
    4. 

  4. VisnabPainter.gen <- setRefClass("VisnabPainter",
    5. 

  5.                                  fields = list(zoomLevel = "numeric"))
    6. 

  6. ## accesors
    7. 

  7. ## addLayer
    8. 

  8. ## Should have the ability to
    9. 

  9. ## 1. Transform automatically when the layer is added(limits)
    10. 

  10. ##    compute limits itself, then compare limits to it's parent,
    11. 

  11. ##    basically most time, it's object's rootLayer.
    12. 

  12. ##    So the assumption here is that:
    13. 

  13. ##    1) we transform them on the same scale
    14. 

  14. ##    2) 
    15. 

  15. ## 2. How to add events?
    16. 

  16. ## assume it has extra column to store the color
    17.