Question

我有以下两个数据向量：

Time <-  c(0.000,4.432,7.824,8.998,9.959,12.790,16.070,18.301,21.549,24.213,25.365, 26.924,27.773,28.917,30.541,32.716)
Score <- c(0.00,9.15,9.41,8.66,8.19,7.72,7.42,7.14,6.67,6.27,5.83,5.47,5.12,4.87,4.65, 0.00)

时间和分数的长度相同。

然后我创建数据框：

myData <- cbind(Time, Score)
myData <- as.data.frame(myData)

然后我用时间函数绘制得分，这要归功于ggplot2：

options(repos = c(CRAN = "https://cran.ma.imperial.ac.uk/", 
              CRANextra = "https://mirrors.ebi.ac.uk/CRAN/"))
install.packages("ggplot2")
library(ggplot2)
myData$Time <- as.numeric(as.character(myData$Time))
myData$Score <- as.numeric(as.character(myData$Score))
myGraph <- ggplot(myData, aes(x=Time, y=Score)) 
myGraph + geom_point()

然后我想用一条简单的线连接每两个连续的点（然后由这两个点确定是唯一的）。所以我使用以下代码：

myGraph + geom_point() + geom_line()

但是现在，我希望能够计算与给定的Score值（可能不在我的数据集中）相对应的Time值（可能不在我的数据集中）。

例如，我希望与分数相对应的时间等于 MAX（MYDATA的$得分）/ 2 就像在我的数据集中一样，这个点不存在，我希望在连接两个观察点的段中对应于它的时间，在这两个点中我试图计算坐标。

Ggplot2和未观察到的点

0 个答案: