如何解决如何根据带有符号参数的函数的结果创建方程
计算PQ1(p=1,q,A)-PQ1(p=0,A)的结果是"2 - 8*q"
我需要将结果转换为方程 2 - 8*q = 0 以找到 q
但我的代码产生以下错误
.jcall("RJavaTools","Ljava/lang/Object;","invokeMethod",cl,中的错误：
SyntaxError: (“在输入 '0' 处没有可行的替代方案”，('',1,168,'__Rsympy= Eq( ( ( ( ( ( 1 * q ) + ( 5 * ( 1 - q ) ) ) + ( 0) * q ) ) + ( 0 * ( 1 - q ) ) ) - ( ( ( ( 0 * q ) + ( 0 * ( 1 - q ) ) ) + ( 7 * q ) ) + ( 3 * ( 1 - q ) ) ) ) ) 0)\n'))
A=matrix(c(1,7,5,3),nrow=2)
library(rSymPy) #symbolic calculations
p<-Var('p')
q<-Var('q')
PQ1 <- function (p,matr){
result<-(matr[1,1]*P*q+matr[1,2]*P*(1-q)+matr[2,1]*(1-p)*q+matr[2,2]*(1-p)*(1-q))
return(result)
}
PQ1(p=1,A)
str<-PQ1(p=1,A)
print(str)
sympy("Eq(",str,"0)") # create an equation
版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 dio@foxmail.com 举报，一经查实，本站将立刻删除。