将高度测量值从英制转换为公制单位

时间:2018-10-16 07:40:41

标签: r

我得到的数据大部分以厘米为单位报告高度,但偶尔会以英寸和英尺为单位(由于地点不同而异)的值。因此,例如,数据可能看起来像:

Height
162
148
153
5' 3"
147
6' 0"
182

很显然,这是解析数据的问题,更不用说使用它了。是否有一种干净的编程方式将英制单位转换为R中的公制单位?

我可以找到许多类似measurements的程序包,这些程序包似乎可以处理单位转换,但似乎没有任何方法可以清楚地解决英尺和英寸这两种怪异的混合体。

1 个答案:

答案 0 :(得分:1)

您还可以创建自定义函数,知道英尺-厘米转换公式:

height <- c(162,148,153,"5' 3",147,"6' 0",182)
#[1] "162"  "148"  "153"  "5' 3" "147"  "6' 0" "182" 

my_conversion <- function(x, costant = 2.54) {

  find_feet <- !is.na(str_match(x, "'")) # we find which values are not in cm

  x[find_feet] <- gsub(" ", "", gsub("'", ".", x[find_feet])) #subsitute ' with . - and remove white spaces
  x <- as.numeric(x)

  feet <- floor(x[find_feet]) # feet 
  inch <- (x[find_feet] - feet) * 10 # inches


  x[find_feet] <- ((feet * 12) + inch) * costant # here we do the conversion feet-cm
  x
}

my_conversion(height)
#[1] 162.00 148.00 153.00 160.02 147.00 182.88 182.00

只要您所有的英尺值都具有',我们就可以用它来找到它们,用.代替它,然后进行转换:cm = inches * 2.54

例如:

5' 3 -> 5.3 -> [(5*12) + 3] * 2.54 = 160.02