(*theplotofTvsxisrequired*)(*THEACTUALEQUATION,sol=xx==x--+Ax,A=0.3136,B=0.0692,C=0.6207,a=1.29,b=0.1101,c=3.014,k=2.5*)sol=xx==x3.014-3.014-0.0692+0.3136xdiff=Subtract@@Simplify[sol,T>0];Plot[diff,{T,0,10}]FindRoot[diff0,{T,1.7}]
∞
∫
0
-k-1
1+
x
k-T
3
2
∞
∫
0
-k-1
1+
x
k-T
3
2
-
x
a
c
-x
b
c
-Cx
B
∞
∫
0
-2.5-1
1+
x
2.5-T
3
2
∞
∫
0
-2.5-1
1+
x
2.5-T
3
2
-
x
1.29
-x
0.1101
-0.6207x
ConditionalExpression0.266667(0.0458159HypergeometricPFQ[{2},{0.75,0.25},0.0963171]-2.4922HypergeometricPFQ[{2},{0.75,0.25},0.150231]+29.2001HypergeometricPFQ[{2},{0.75,0.25},20.6236])+0.0836267-0.0184533HypergeometricPFQ1,,0.25,-0.25,,0.0963171+0.803733HypergeometricPFQ1,,0.25,-0.25,,0.150231-0.803733HypergeometricPFQ1,,0.25,-0.25,,20.6236+(-0.0399864HypergeometricPFQ[{1.75,2.25},{1.75,0.5,1.25},0.0963171]+2.43076HypergeometricPFQ[{1.75,2.25},{1.75,0.5,1.25},0.150231]-97.4868HypergeometricPFQ[{1.75,2.25},{1.75,0.5,1.25},20.6236]-0.0399864HypergeometricPFQ[{2.25,1.75},{1.25,0.5,1.75},0.0963171]+2.43076HypergeometricPFQ[{2.25,1.75},{1.25,0.5,1.75},0.150231]-97.4868HypergeometricPFQ[{2.25,1.75},{1.25,0.5,1.75},20.6236])+(-0.0347474HypergeometricPFQ[{2.25,2.75},{2.25,1.5,1.75},0.0963171]+2.63804HypergeometricPFQ[{2.25,2.75},{2.25,1.5,1.75},0.150231]-1239.61HypergeometricPFQ[{2.25,2.75},{2.25,1.5,1.75},20.6236]-0.0347474HypergeometricPFQ[{2.75,2.25},{1.75,1.5,2.25},0.0963171]+2.63804HypergeometricPFQ[{2.75,2.25},{1.75,1.5,2.25},0.150231]-1239.61HypergeometricPFQ[{2.75,2.25},{1.75,1.5,2.25},20.6236]),Re[T]≥0&&2Arg≤π||Im[T]>0
2
T
1
8.
1
T
5.
1
T
2
T
2
T
2
T
6.
1
T
3
2
1
2
2
T
3
2
1
2
2
T
3
2
1
2
2
T
4.5
1
T
2
T
2
T
2
T
2
T
2
T
2
T
3.5
1
T
2
T
2
T
2
T
2
T
2
T
2
T
1
T
FindRoot::lstol:The line search decreased the step size to within tolerance specified by AccuracyGoal and PrecisionGoal but was unable to find a sufficient decrease in the merit function. You may need more than MachinePrecision digits of working precision to meet these tolerances.
{T1.71154}