求解方程，知道y怎么求x？？？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

用R解方程
比如方程是
y<- function(x, y0, y1, xmid, s2){
    y0 + (y1 - y0) * exp(-(x - xmid)^2/(2 * s2))
}

其中，估计出的参数y0 = 4.618755e-07,   
                             y1 = 3.995935e-02
                         xmid = 9.746333
                            s2 = 5.986636

请教大牛，假设在知道  y =  4.618755e-07   的时候，怎么求出相应的x???




有人说可以使用uniroot，但是一直没有成功，不知道哪里用错了...

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：解方程

你的公式里，如果y =  4.618755e-07 ， x等于负无穷

qoiqpwqr 发表于 2014-11-20 10:48
你的公式里，如果y =  4.618755e-07 ， x等于负无穷

根据plot出来的图显示，应该是大于0的

1. y <- function(x, y0, y1, xmid, s2){
   
2.     y0 + (y1 - y0) * exp(-(x - xmid)^2/(2 * s2))
   
3. }
   
4. 
   
5. y0 <- 4.618755e-07   
   
6. y1 <- 3.995935e-02
   
7. xmid <- 9.746333
   
8. s2 <- 5.986636
   
9. 
   
10. yy <- function(x, y0, y1, xmid, s2)
    
11.     y(x, y0, y1, xmid, s2) - 0.0001
    
12. 
    
13. uniroot(yy, y0=y0, y1=y1, xmid=xmid, s2=s2, interval=c(-10, 10))

复制代码

求当y等于0.0001时的x值

qoiqpwqr 发表于 2014-11-20 21:53
求当y等于0.0001时的x值

观点很有启发，谢谢大牛