AWS - Brave new world

2017/04/17

Remarkable!

AWS indeed provides a totally new perspective how softwares work in the internet.

I was really shocked today.

You can run Rstudio through AWS with a help of this article. https://aws.amazon.com/ko/blogs/big-data/running-r-on-aws/

I updated some bash codes of latest version of Rstudio server and Shiny server according to the Rstudio website as shown below.

#!/bin/bash
#install R
yum install -y R

#install RStudio-Server
#https://www.rstudio.com/products/rstudio/download-server/
wget https://download2.rstudio.org/rstudio-server-rhel-1.0.136-x86_64.rpm
yum install -y --nogpgcheck rstudio-server-rhel-1.0.136-x86_64.rpm

#install shiny and shiny-server
#https://www.rstudio.com/products/shiny/download-server/
R -e "install.packages('shiny', repos='http://cran.rstudio.com/')"
wget https://download3.rstudio.org/centos5.9/x86_64/shiny-server-1.5.3.838-rh5-x86_64.rpm
yum install -y --nogpgcheck shiny-server-1.5.3.838-rh5-x86_64.rpm

#add user(s)
useradd your_username
echo your_username:your_password | chpasswd

Then I installed tidyverse and cowplot.

library(ggplot2)
library(dplyr)
library(cowplot)

Backbone <- ggplot(Theoph %>% 
                     mutate(Subject = as.numeric(Subject)), 
                   aes(Time, conc, group = Subject, colour = Wt)) +
  geom_line() +
  geom_point() + 
  scale_y_log10()

Individual <- Backbone + facet_wrap(~ Subject)
groupLinear <- Backbone + scale_y_continuous()
groupLog <- groupLinear + scale_y_log10()

ggdraw() +
  draw_plot(Individual, 0, .5, 1, .5) +
  draw_plot(groupLinear, 0, 0, .5, .5) +
  draw_plot(groupLog, .5, 0, .5, .5) +
  draw_plot_label(c("A", "B", "C"), c(0, 0, 0.5), c(1, 0.5, 0.5), size = 15)

Thanks.