Nothing
## ----include = FALSE----------------------------------------------------------
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#>",
out.width = "50%",
fig.width = 5,
fig.height = 4
)
## ----compress-----------------------------------------------------------------
library(blosc)
data_input <- as.raw(c(1, 2, 3, 4, 1, 2, 3, 4))
blosc_compress(data_input, typesize = 2)
## ----compress-type------------------------------------------------------------
## The line below won't work as the default `typesize` (4) does
## not match with the dtype size (2)
## blosc_compress(iris$Petal.Length, dtype = "<f2")
## Explicitely set the `typesize` to 2
compressed_iris <-
blosc_compress(iris$Petal.Length, typesize = 2, dtype = "<f2")
## ----blosc-info---------------------------------------------------------------
blosc_info( compressed_iris )
## ----decompress---------------------------------------------------------------
iris_length1 <- blosc_decompress(compressed_iris)
head(iris_length1)
## ----decompress-type----------------------------------------------------------
iris_length2 <- blosc_decompress(compressed_iris, dtype = "<f2")
hist(iris_length2)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.