Skip to content

Instantly share code, notes, and snippets.

@robertjwilson
Last active July 10, 2017 16:38
Show Gist options
  • Select an option

  • Save robertjwilson/802566da9e14c62f4905294e6a0f2515 to your computer and use it in GitHub Desktop.

Select an option

Save robertjwilson/802566da9e14c62f4905294e6a0f2515 to your computer and use it in GitHub Desktop.
library(pryr)
library(tidyverse)
x <- data.frame(x = 1:1000)
y <- x
object_size(x)+ object_size(y)
object_size(x,y)
x <- data.frame(x = 1:1000)
y <- x
y$y <- 1:1000
object_size(x)+ object_size(y)
object_size(x,y)
x <- data.frame(x = 1:1000)
y <- x
y$y <- x
object_size(x)+ object_size(y)
object_size(x,y)
y <- y %>%
select(-y)
object_size(x)+ object_size(y)
object_size(x,y)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment