越來越從價值和CDF

Question

數據幀80個百分點我有一個數據幀如下

day<-c(1,1,2,2) 
probability<-c(0.5,0.9,0.4,0.95) 
demand<-c(2,8,4,9) 
df<-data.frame(day,probability,demand) 

我需要在0.8的概率的需求。爲此我需要插值數據 我要找的輸出如下：

day1 prob1 dem2 
1 0.8 6.50 
2 0.8 7.63 

我想我需要使用約功能，但我無法得到它的權利。任何幫助將不勝感激。

Answer 1

我想我想到了這個問題的答案。

result<-ddply(df,~day,summarise,demand1=approx(probability,demand,xout=0.8)$y) 

將給出以下的數據幀

day  demand1 
1 6.500000 
2 7.636364