1

I have a 5 dataframes containing multiple variables (110) in three different languages and I'm pretty new to using R. I'm recoding the factors to numbers that I can merge all of the dataframes in the end. With most of the factors it simply worked, except for the following sentence. I suspect that the dot in "ESG Art. 383 und Art. 384" are confusing but I can't get rid of it

data$B1aC <- as.factor(data$B1aC) levels(data$B1aC) summary(data$B1aC) data$B1aC <- factor(data$B1aC, levels = c("Einsatz auf Wunsch des Bewohners/der Bewohnerin oder im Einverständnis mit dem/der dazu urteilsfähigen Bewohner/-in","Einsatz bei dazu nicht urteilsfähiger Bewohner/-in, alle Bedingungen (ESG Art. 383 und Art. 384) sind erfüllt","Kontext ist noch nicht geklärt, nicht alle Bedingungen (ESG Art. 383 und Art. 384) sind erfüllt"),labels = c("1", "2", "3")) table(data$B1aC)

When I display the transformed data, I lose numbers 2 and 3 (both having a dot in their level). Does anyone know what I can do?

I'm using Rstudio on Apple (x86_64-apple-darwin13.4.0) with R 3.3.3 running.

this is the output for table()

table(data$B1aC) Einsatz auf Wunsch des Bewohners/der Bewohnerin oder im Einverständnis mit dem/der dazu urteilsfähigen Bewohner/-in 1 Einsatz bei dazu nicht urteilsfähiger Bewohner/-in, alle Bedingungen (ESG Art. 383 und Art. 384) sind erfüllt 1 Kontext ist noch nicht geklärt, nicht alle Bedingungen (ESG Art. 383 und Art. 384) sind erfüllt 1 summary(data$B1aC) Einsatz auf Wunsch des Bewohners/der Bewohnerin oder im Einverständnis mit dem/der dazu urteilsfähigen Bewohner/-in 1 Einsatz bei dazu nicht urteilsfähiger Bewohner/-in, alle Bedingungen (ESG Art. 383 und Art. 384) sind erfüllt 1 Kontext ist noch nicht geklärt, nicht alle Bedingungen (ESG Art. 383 und Art. 384) sind erfüllt 1 NA's 97

I had to convert the strings to numbers because the data frames are in 3 different languages - merging then would confuse me, because I'm not too familiar with all the languages.

after transforming the data:

data$B1aC <- factor(data$B1aC, levels = c("Einsatz auf Wunsch des Bewohners/der Bewohnerin oder im Einverständnis mit dem/der dazu urteilsfähigen Bewohner/-in", "Einsatz bei dazu nicht urteilsfähiger Bewohner/-in, alle Bedingungen (ESG Art. 383 und Art. 384) sind erfüllt", "Kontext ist noch nicht geklärt, nicht alle Bedingungen (ESG Art. 383 und Art. 384) sind erfüllt"), labels = c("1", "2", "3")) table(data$B1aC) 1 2 3 1 0 0
Improve this question
6
  • "I'm recoding the factors to numbers that I can merge all of the dataframes in the end." - this isn't necessary because you can merge on character variables. Can you describe what you mean by merging here, and include your output? Commented May 22, 2017 at 12:35
  • 1
    have you tried levels(data$B1aC) <- c("Einsatz....","Einsatz...","Kontext...") ? Commented May 22, 2017 at 12:37
  • I believe the parentheses need to be escaped, thus "\\(" and "\\)". Commented May 22, 2017 at 13:07
  • as well as all the punctuation Commented May 22, 2017 at 13:36
  • Please show the output from table(). Escaping punctuation or parentheses shouldn't be necessary because levels() involves no pattern matching. The vector assigned is "a vector of character strings with length at least the number of levels of x, or a named list specifying how to rename the levels." Commented May 22, 2017 at 13:49

2 Answers 2

Reset to default
1

Given your text you can get rid of the punctuations as follows:

 text<-c("Einsatz auf Wunsch des Bewohners/der Bewohnerin oder im Einverständnis mit dem/der dazu urteilsfähigen Bewohner/-in","Einsatz bei dazu nicht urteilsfähiger Bewohner/-in, alle Bedingungen (ESG Art. 383 und Art. 384) sind erfüllt","Kontext ist noch nicht geklärt, nicht alle Bedingungen (ESG Art. 383 und Art. 384) sind erfüllt") text<-gsub(pattern = "[[:punct:]]"," ",text,perl=T)

Thus yielding: 

> text [1] "Einsatz auf Wunsch des Bewohners der Bewohnerin oder im Einverständnis mit dem der dazu urteilsfähigen Bewohner in" [2] "Einsatz bei dazu nicht urteilsfähiger Bewohner in alle Bedingungen ESG Art 383 und Art 384 sind erfüllt" [3] "Kontext ist noch nicht geklärt nicht alle Bedingungen ESG Art 383 und Art 384 sind erfüllt"
Improve this answer
Sign up to request clarification or add additional context in comments.

Comments

0

It looks as if you're trying to relabel your factor so that each level has a numeric label, instead of the existing text label. This does not require carefully replicating each of the existing labels, or clobbering their punctuation toward this end.

Factors inherit from integer and as.numeric gives you their numeric representation:

data(warpbreaks) table(warpbreaks$wool) # # A B # 27 27 table(as.numeric(warpbreaks$wool)) # # 1 2 # 27 27

At this point, if you really wanted, you could relabel the factor numerically (below), but from your mention of needing to merge dataframes by this variable, I can't think of why this would be desirable.

warpbreaks$wool <- factor(warpbreaks$wool, labels = unique(as.numeric(warpbreaks$wool))) table(warpbreaks$wool) # # 1 2 # 27 27
Improve this answer

Comments

Start asking to get answers

Find the answer to your question by asking.

Ask question

Explore related questions

See similar questions with these tags.