jackbrookes

//
// Copyright 2014-2015 Amazon.com, 
// Inc. or its affiliates. All Rights Reserved.
// 
// Licensed under the AWS Mobile SDK For Unity 
// Sample Application License Agreement (the "License"). 
// You may not use this file except in compliance with the 
// License. A copy of the License is located 
// in the "license" file accompanying this file. This file is 
// distributed on an "AS IS" BASIS, WITHOUT WARRANTIES OR 

jackbrookes

library(tidyverse)
library(gridExtra)

plot_cars_var <- function(col_name){
  ggplot(mtcars, aes_string(x = "mpg", y = col_name)) +
    geom_smooth() +
    geom_point()
}

mtcars %>% 

jackbrookes

library(png)
library(grid)
library(tidyverse)

# generate random data
my.data <- data.frame(x = c(1:10), y = rnorm(10))

# plot random data
g <- ggplot(my.data, aes(x = x, y = y)) + 
  geom_point()