In [1]:
library(IRdisplay)
library(devtools)

In [2]:
dev_mode(on=T)
install_github("mathisonian/lightning-rstat/LightningR")


Dev mode: ON
Downloading GitHub repo mathisonian/lightning-rstat@master
Installing LightningR
'/Library/Frameworks/R.framework/Resources/bin/R' --no-site-file --no-environ  \
  --no-save --no-restore CMD INSTALL  \
  '/private/var/folders/3l/dq6657ms43j0mnn0m3jd9_x00000gn/T/Rtmp7iILsG/devtools5c1a1a579025/mathisonian-lightning-rstat-0374924/LightningR'  \
  --library='/Users/mathisonian/R-dev' --install-tests 


In [3]:
library(LightningR)
vizserver <- Lightning$new("http://public.lightning-viz.org/", notebook=T)


Loading required package: RJSONIO
Loading required package: RCurl
Loading required package: bitops
Loading required package: R6
Loading required package: httr

In [4]:
vizserver$createsession()


Out[4]:
id
'2fbe0011-1da3-4406-b959-b414ef0aa613'
name
''
updatedAt
'2015-11-30T22:58:40.009Z'
createdAt
'2015-11-30T22:58:40.009Z'

In [5]:
vizserver$line(c(1,2,3,4,5,6,7,8))



In [6]:
vizserver$scatter(c(1, 2, 3), c(1, 2, 3), )



In [7]:
x <- seq(-3, 7, by = 1/8)

In [13]:
vizserver$line(cos(x))



In [18]:
vizserver$scatter(x, cos(x))


excercise use the scatter3 function to plot a sin wave in webgl

try to modify the color of each point


In [ ]:


In [ ]:


In [ ]:


In [ ]:


In [ ]:


In [ ]:


In [ ]:


In [ ]:


In [ ]:


In [ ]:


In [ ]:


In [ ]:


In [ ]:


In [ ]:


In [ ]: