Difference between revisions of "MyTest"
Jump to navigation
Jump to search
m |
m |
||
| (43 intermediate revisions by the same user not shown) | |||
| Line 2: | Line 2: | ||
| − | {| cellpadding="2" | + | |
| − | + | {| align=left; cellpadding="2" style="width: 1000px; background-color:white; font-family:'courier new';font-size:12pt;" | |
| − | | f | + | | colspan = "2" style="align:center;" | fmin1=function(x,y,t) <br> {f=predc1(t,x) <br> g=x[4] <br> e=sum( ((y-f)/g)^2+log(g^2)) <br> } |
|- | |- | ||
| − | | | + | |<br> |
|- | |- | ||
| − | | | + | | colspan = "2" style="align:center;" |fmin2=function(x,y,t) <br> {f=predc2(t,x) <br> g=x[4] <br> e=sum( ((y-f)/g)^2+log(g^2))<br> } |
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | | f | ||
|- | |- | ||
| − | | | + | |<br> |
| + | |- | ||
| + | | colspan = "2" style="align:center;" | #-------- MLE --------# | ||
|- | |- | ||
| − | | | + | |<br> |
| + | |- | ||
| + | | style="width: 400px; text-align:left; | pk.nlm1=nlm(fmin1,c(0.3,6,0.2,1),y,t,hessian="true") <br> <code><div style="font-family:'courier new';font-size:12pt;">psi1=pk.nlm1$estimate</div></code> <br> pk.nlm2=nlm(fmin2,c(3,10,0.2,4),y,t,hessian="true") <br> <code><div style="font-family:'courier new';font-size:12pt;">psi2=pk.nlm2$estimate</div></code> || | ||
| + | | style="width: 600px; text-align:left;" | <div style="color:red"> >cat(" psi1 =",psi1,"\n\n") </div><br> <div style="color:blue"> psi1 = 0.3240916 6.001204 0.3239337 0.4366948 </div><br><br> <div style="color:red"> >cat(" psi2 =",psi2,"\n\n")</div> <br> <div style="color:blue"> psi2 = 3.203111 8.999746 0.229977 0.2555242 </div> | ||
|} | |} | ||
| − | |||
| − | |||
| − | |||
| Line 31: | Line 27: | ||
| − | {| | + | {| align = center |
|This paragraph is before the table. | |This paragraph is before the table. | ||
Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod... | Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod... | ||
Latest revision as of 17:15, 4 February 2013
| fmin1=function(x,y,t) {f=predc1(t,x) g=x[4] e=sum( ((y-f)/g)^2+log(g^2)) } | ||
| fmin2=function(x,y,t) {f=predc2(t,x) g=x[4] e=sum( ((y-f)/g)^2+log(g^2)) } | ||
| #-------- MLE --------# | ||
pk.nlm1=nlm(fmin1,c(0.3,6,0.2,1),y,t,hessian="true") |
>cat(" psi1 =",psi1,"\n\n") psi1 = 0.3240916 6.001204 0.3239337 0.4366948 >cat(" psi2 =",psi2,"\n\n") psi2 = 3.203111 8.999746 0.229977 0.2555242
| |
| This paragraph is before the table.
Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod... |
|
Note the floating-table to the right.
This paragraph is after the table. The text in column 2
will span both rows due to format specifier "rowspan=2" so there
is no coding for "Col 2" in the 2nd row, just: Col 1 & Col 3.
