<html xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns:m="http://schemas.microsoft.com/office/2004/12/omml" xmlns="http://www.w3.org/TR/REC-html40"><head><meta http-equiv=Content-Type content="text/html; charset=utf-8"><meta name=Generator content="Microsoft Word 15 (filtered medium)"><!--[if !mso]><style>v\:* {behavior:url(#default#VML);}
o\:* {behavior:url(#default#VML);}
w\:* {behavior:url(#default#VML);}
.shape {behavior:url(#default#VML);}
</style><![endif]--><style><!--
/* Font Definitions */
@font-face
{font-family:"Cambria Math";
panose-1:2 4 5 3 5 4 6 3 2 4;}
@font-face
{font-family:Calibri;
panose-1:2 15 5 2 2 2 4 3 2 4;}
@font-face
{font-family:Consolas;
panose-1:2 11 6 9 2 2 4 3 2 4;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{margin:0cm;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:"Times New Roman",serif;}
a:link, span.MsoHyperlink
{mso-style-priority:99;
color:#0563C1;
text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
{mso-style-priority:99;
color:#954F72;
text-decoration:underline;}
p.msonormal0, li.msonormal0, div.msonormal0
{mso-style-name:msonormal;
mso-margin-top-alt:auto;
margin-right:0cm;
mso-margin-bottom-alt:auto;
margin-left:0cm;
font-size:12.0pt;
font-family:"Times New Roman",serif;}
span.EmailStyle18
{mso-style-type:personal-reply;
font-family:"Calibri",sans-serif;
font-variant:normal !important;
color:black;
text-transform:none;
font-weight:normal;
font-style:normal;
text-decoration:none none;
vertical-align:baseline;}
.MsoChpDefault
{mso-style-type:export-only;
font-family:"Calibri",sans-serif;
mso-fareast-language:EN-US;}
@page WordSection1
{size:612.0pt 792.0pt;
margin:70.85pt 3.0cm 70.85pt 3.0cm;}
div.WordSection1
{page:WordSection1;}
--></style><!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]--></head><body lang=PT link="#0563C1" vlink="#954F72"><div class=WordSection1><p class=MsoNormal><span lang=EN-GB style='font-family:"Calibri",sans-serif;color:black;mso-fareast-language:EN-US'>Hello Nick,<o:p></o:p></span></p><p class=MsoNormal><span lang=EN-GB style='font-family:"Calibri",sans-serif;color:black;mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoNormal><span lang=EN-GB style='font-family:"Calibri",sans-serif;color:black;mso-fareast-language:EN-US'>Once you have your lmc fitted, call the object $psill.<o:p></o:p></span></p><p class=MsoNormal><span lang=EN-GB style='font-family:"Calibri",sans-serif;color:black;mso-fareast-language:EN-US'>For example, if your lmc object is called g.fit with variables v , z call:<o:p></o:p></span></p><p class=MsoNormal><span lang=EN-GB style='font-family:"Calibri",sans-serif;color:black;mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoNormal><span lang=EN-GB style='font-family:"Calibri",sans-serif;color:black;mso-fareast-language:EN-US'>g.fit$model$v$psill[1] to get coefficient of v for 1st structure of the nested model.<o:p></o:p></span></p><p class=MsoNormal><span lang=EN-GB style='font-family:"Calibri",sans-serif;color:black;mso-fareast-language:EN-US'>g.fit$model$z$psill[1] to get coefficient of z for 1st structure of the nested model.<o:p></o:p></span></p><p class=MsoNormal><span lang=EN-GB style='font-family:"Calibri",sans-serif;color:black;mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoNormal><span lang=EN-GB style='font-family:"Calibri",sans-serif;color:black;mso-fareast-language:EN-US'>g.fit$model$v$psill[2] to get coefficient of v for 2nd structure of the nested model.<o:p></o:p></span></p><p class=MsoNormal><span lang=EN-GB style='font-family:"Calibri",sans-serif;color:black;mso-fareast-language:EN-US'>g.fit$model$z$psill[2] to get coefficient of z for 2nd structure of the nested model.<o:p></o:p></span></p><p class=MsoNormal><span lang=EN-GB style='font-family:"Calibri",sans-serif;color:black;mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoNormal><span lang=EN-GB style='font-family:"Calibri",sans-serif;color:black;mso-fareast-language:EN-US'>For cross-variogram, please see the list of g.fit$model to see the name of the object storing v*z cross-variogram model coefficients.<o:p></o:p></span></p><p class=MsoNormal><span lang=EN-GB style='font-family:"Calibri",sans-serif;color:black;mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoNormal><span lang=EN-GB style='font-family:"Calibri",sans-serif;color:black;mso-fareast-language:EN-US'>I hope this helps. There are other ways of doing this, anyway this one should work.<o:p></o:p></span></p><p class=MsoNormal><span lang=EN-GB style='font-family:"Calibri",sans-serif;color:black;mso-fareast-language:EN-US'>Regards,<o:p></o:p></span></p><p class=MsoNormal><span lang=EN-GB style='font-family:"Calibri",sans-serif;color:black;mso-fareast-language:EN-US'>Manuel<o:p></o:p></span></p><p class=MsoNormal><span lang=EN-GB style='font-family:"Calibri",sans-serif;color:black;mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoNormal><span style='font-family:"Calibri",sans-serif;color:black'><o:p> </o:p></span></p><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:black'>Manuel Luís Castro Ribeiro<o:p></o:p></span></p><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:black'><o:p> </o:p></span></p><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:black'>CERENA- Centro de Recursos Naturais e Ambiente<o:p></o:p></span></p><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:black'><br>Instituto Superior Técnico<br>Av. Rovisco Pais <o:p></o:p></span></p><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:black'>1049-001 Lisboa <o:p></o:p></span></p><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:black'>Portugal<o:p></o:p></span></p><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:black'><br>Phone: +351 21 841 74 41<o:p></o:p></span></p><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:black'>Mobile: +351 92 442 80 07<o:p></o:p></span></p><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:black'><o:p> </o:p></span></p><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:black'>Web: <a href="http://www.cerena.pt/"><span style='color:#0563C1'>www.cerena.pt</span></a></span><span style='font-size:11.0pt;font-family:"Calibri",sans-serif;color:black'><o:p></o:p></span></p><p class=MsoNormal><span style='font-family:"Calibri",sans-serif;color:black'><o:p> </o:p></span></p><p class=MsoNormal><span style='font-family:"Calibri",sans-serif;color:black;mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoNormal><span style='font-family:"Calibri",sans-serif;color:black;mso-fareast-language:EN-US'><o:p> </o:p></span></p><p class=MsoNormal><b><span lang=EN-US style='font-size:11.0pt;font-family:"Calibri",sans-serif'>From:</span></b><span lang=EN-US style='font-size:11.0pt;font-family:"Calibri",sans-serif'> R-sig-Geo <r-sig-geo-bounces@r-project.org> <b>On Behalf Of </b>Nick Hamm<br><b>Sent:</b> quarta-feira, 29 de janeiro de 2020 04:22<br><b>To:</b> r-sig-geo <r-sig-geo@stat.math.ethz.ch>; r-sig-geo@r-project.org<br><b>Subject:</b> [R-sig-Geo] gstat / Linear model of coregionalization<o:p></o:p></span></p><p class=MsoNormal><o:p> </o:p></p><div><div><p class=MsoNormal>Dear all<o:p></o:p></p></div><div><p class=MsoNormal>Is anybody using gstat for computing cross-variograms and fitting cross variogram models? I have implemented this in a similar manner to the example code given in the gstat vignette (Section 10).<o:p></o:p></p></div><div><p class=MsoNormal><o:p> </o:p></p></div><div><p class=MsoNormal>I would like to extract the coefficients (i.g., the b_{ij}^l of the linear model of coregionalization as given in Equation 4.37 of Goovaearts (1997) book (page 110). <o:p></o:p></p></div><div><p class=MsoNormal><o:p> </o:p></p></div><div><p class=MsoNormal>\gamma_{ij} (h) = \sum_{l=0}^L b_{ij}^l g_l(h) \forall i, j <o:p></o:p></p></div><div><p class=MsoNormal><o:p> </o:p></p></div><div><div><p class=MsoNormal style='margin-bottom:12.0pt'><img border=0 width=211 height=68 style='width:2.2in;height:.7083in' id="_x0000_i1025" src="cid:image001.png@01D5D696.D6102B40" alt=image.png><o:p></o:p></p></div><p class=MsoNormal><o:p> </o:p></p></div><div><p class=MsoNormal><o:p> </o:p></p></div><div><p class=MsoNormal>Is this possible?<o:p></o:p></p></div><div><p class=MsoNormal><o:p> </o:p></p></div><div><p class=MsoNormal>kind regards<o:p></o:p></p></div><div><p class=MsoNormal><o:p> </o:p></p></div><div><p class=MsoNormal>Nick<o:p></o:p></p></div><div><p class=MsoNormal><o:p> </o:p></p></div><div><p class=MsoNormal><o:p> </o:p></p></div></div></div></body></html>