Question

我确定已经问过这个问题，但我无法找到直接答案。这应该很容易，但是，我很难找到答案。基本上我有一个有10列/向量的df。我想要一个Vector，然后将其减少一个。以下是我的代码。我确信它会起作用，但我认为必须有一个更简单的方法。在此先感谢您的帮助。

diffuse_objects <- c("Diffuse Nebula", "Elliptical Galaxy", "Spiral Galaxy",      "Galaxy", "Planetary Nebula",
                 "Nebula", "Cluster Nebulosity")



#subset diffuse Ojbects
newdf2 <- newdf[newdf$Type == diffuse_objects,] 
#Change from character to Numeric
newdf2$Magnitude <- as.numeric(newdf2$Magnitude)
#Subtract -1 
newdf3 <- newdf2[, "Magnitude"] - 1
newdf4 <-cbind(newdf3, newdf2)

Answer 1

diffuse_objects <- c("Diffuse Nebula", "Elliptical Galaxy", "Spiral Galaxy",      "Galaxy", "Planetary Nebula",
                 "Nebula", "Cluster Nebulosity")



#subset diffuse Ojbects
newdf2 <-filter(newdf,Type %in% diffuse_objects)
#Change from character to Numeric
newdf2$Magnitude <- as.numeric(newdf2$Magnitude)-1

从Vector R中减去一个的问题

1 个答案: