not_included/testing.R

In antaldaniel/surveyreader: Data cleaning and integration for survey files

library(tidyverse)
foo = data.frame (
  gender = c( "nõ", "férfi"),
  name = c("Ági", "Jenõ")
)
which (foo$gender == "nõ")
which (foo$gender  == "no")
which (foo$gender == "mo")

View (foo)

write.csv(foo, "foo.csv", row.names = F)
write_csv(foo, "foo2.csv")

foo_r <- read.csv("foo.csv", stringsAsFactors = F)
which (foo_r$gender == "nõ")
which (foo_r$gender  == "no")
which (foo_r$gender == "mo")

foo_r2 <- read_csv("foo2.csv", col_names = T)
which (foo_r2$gender == "nõ")
which (foo_r2$gender  == "no")
which (foo_r2$gender == "mo")

foo_r3 <- read_csv("foo_man.csv", col_names = T)
which (foo_r3$gender == "nõ")
which (foo_r3$gender  == "no")
which (foo_r3$gender == "mo")

foo_r4 <- read_csv("foo_man_utf8.csv")
which (foo_r3$gender == "nõ")
which (foo_r3$gender  == "no")
which (foo_r3$gender == "mo")

View (foo_r4)