knitr::opts_chunk$set( collapse = F, comment = "#>" ) library(DiagrammeR) library(hablar) library(dplyr)
retype quick start your analysisGetting data into R can be hassle. But once you do, it often have incorrect data types/classes. For instance, it is not uncommon that numeric variables are characters or dates are classed as characters.
Data conversion is cumbersome and small coding mistakes can produce large issues. The hablar package facilitates correction of all data types directly after you import the data into R such that you can avoid dangerous operations at later stages!
retype do?retype provides an easy approach for quick and dirty data type conversion. It follows a strict simplification hierarchy for each column of your data frame. It only converts the column if it can assume that no important information is lost in the process. For example, the character vector c("1", "2") should rather be an integer vector. Similarly, the character "2010-06-04" should be a date. Factors have advantages, but they are never the simplest solution and hence it is always converted to character, at least.
retype(x, ...)
where x is a data frame, and ... is the column names you want to apply retype to. x could also be a single vector.
x <- as.numeric(3) retype(x)
class(retype(x))
x <- as.character("2017-03-02") retype(x)
class(retype(x))
x <- as.character(c("3,56", "0,78")) retype(x)
class(retype(x))
x <- as.factor(c(3, 4)) retype(x)
class(retype(x))
retype uses a procedure to determine which data type is the simplest, without loosing any vital information in your data.
The first thing to know about retype is that it always converts factors to character.
The second thing to know is that all logical columns are converted to integers.
Thirdly, complex and list columns are left unchanged.
From there it will test if the data could be coded as numeric. If true it converts the column to numeric.
If it is numeric it tests if it could be an integer instead. If true, it converts the column to integer.
If it is a character it tests if it could be a date column. If true, it converts it to a date column.
If it is a date time column it tests if it could be a date. If true, it converts it to a date column.
The above procedure could more intuitively be described in a diagram. The arrows imply a test if a column could be converted to another without loosing information in your data. The procedure continues until it cannot be simplified further.
grViz("digraph d { node [shape = circle, style = filled] factor;character;numeric;integer;'date time';date;logical;list;complex logical -> integer; factor -> character; character -> numeric numeric -> integer; character -> date; date -> 'date time'; }")
Examine the following dataset starwars from the package dplyr. First, we use convert on some columns to new data types.
df <- starwars %>% select(1:4) %>% convert(fct(name), chr(height:mass), fct(hair_color)) %>% print()
We then apply retype on df:
df %>% retype()
Which correctly guessed that height preferably should be an integer vector and that mass works better as a numeric column. The factors were converted to character columns.
retype in production codeNever use retype when you need your scripts to work the next time in the exact same way. retype may change over time, it could guess wrong and your data may change. Use hablar::convert instead where you explicitly state which data type each column should have.
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.