<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)">
<style><!--
/* Font Definitions */
@font-face
        {font-family:Helvetica;
        panose-1:2 11 6 4 2 2 2 2 2 4;}
@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:Cambria;
        panose-1:2 4 5 3 5 4 6 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:blue;
        text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
        {mso-style-priority:99;
        color:purple;
        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;}
p.gmail-msonormal, li.gmail-msonormal, div.gmail-msonormal
        {mso-style-name:gmail-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.EmailStyle19
        {mso-style-type:personal-reply;
        font-family:"Calibri",sans-serif;
        color:#1F497D;}
.MsoChpDefault
        {mso-style-type:export-only;
        font-family:"Calibri",sans-serif;
        mso-fareast-language:EN-US;}
@page WordSection1
        {size:612.0pt 792.0pt;
        margin:72.0pt 72.0pt 72.0pt 72.0pt;}
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="EN-GB" link="blue" vlink="purple">
<div class="WordSection1">
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US">Dear Bob,<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US"><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US">(By the way: for this type of question, the Siena-Stocnet list<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US"><a href="http://groups.yahoo.com/groups/stocnet/">http://groups.yahoo.com/groups/stocnet/</a><o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US">is more appropriate).<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US">I think that, depending on directionality, the effects from, sharedIn, closure, or fromMutual might be appropriate. (Note: this is
 not an interaction, it’s a regular effect). <o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US"><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US">Best regards,<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US">Tom<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;mso-fareast-language:EN-US"><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D">=================================================<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D">Tom A.B. Snijders<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D">Professor of Statistics and Methodology<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D">Department of Sociology, University of Groningen<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D">Emeritus Fellow, Nuffield College, University of Oxford<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D">Associate Member, Dept. of Statistics, University of Oxford<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Calibri",sans-serif;color:#1F497D;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"> rsiena-help-bounces@lists.r-forge.r-project.org [mailto:rsiena-help-bounces@lists.r-forge.r-project.org]
<b>On Behalf Of </b>Bob Faris<br>
<b>Sent:</b> 04 January 2018 19:11<br>
<b>To:</b> rsiena-help@lists.r-forge.r-project.org<br>
<b>Subject:</b> [Rsiena-help] Interacting two effects in models of multiple networks<o:p></o:p></span></p>
<p class="MsoNormal"><o:p> </o:p></p>
<div>
<div>
<p class="MsoNormal"><span style="font-family:"Arial",sans-serif">Hi all, I am estimating RSiena models of multiple (binary, one-mode, two-wave) networks and have a significant positive effect from a tie in the W network (allegiance) to a tie in the X (exports)
 network (the "crprod" effect). What I'd like to test is an interaction between shared W partners (something like </span><span style="font-family:"Helvetica",sans-serif">gwespFBMix) </span><span style="font-family:"Arial",sans-serif">and the direct W tie on
 the X tie--in other words, does allegiance (W) lead to exports (X) more often when there are more shared allies? <o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal"><span style="font-family:"Arial",sans-serif"><o:p> </o:p></span></p>
</div>
<div>
<p class="MsoNormal"><span style="font-family:"Arial",sans-serif">Here's the script, thanks in advance!<o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal"><span style="font-family:"Arial",sans-serif">-Bob<o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal"><span style="font-family:"Arial",sans-serif"><o:p> </o:p></span></p>
</div>
<div>
<p class="gmail-msonormal" style="margin:0cm;margin-bottom:.0001pt"><span style="font-family:"Arial",sans-serif">exports <- sienaNet(array(c(exports1978,exports1979), dim=c(91,91,2)))</span><span style="font-family:"Cambria",serif"><o:p></o:p></span></p>
<p class="gmail-msonormal" style="margin:0cm;margin-bottom:.0001pt"><span style="font-family:"Arial",sans-serif">ally  <- sienaNet(array(c(ally1978,ally1979), dim=c(91,91,2)))</span><span style="font-family:"Cambria",serif"><o:p></o:p></span></p>
<p class="gmail-msonormal" style="margin:0cm;margin-bottom:.0001pt"><span style="font-family:"Arial",sans-serif"> </span><span style="font-family:"Cambria",serif"><o:p></o:p></span></p>
<p class="gmail-msonormal" style="margin:0cm;margin-bottom:.0001pt"><span style="font-family:"Arial",sans-serif">data.1978 <- sienaDataCreate(exports,ally)</span><span style="font-family:"Cambria",serif"><o:p></o:p></span></p>
<p class="gmail-msonormal" style="margin:0cm;margin-bottom:.0001pt"><span style="font-family:"Arial",sans-serif">effects.1978 <- getEffects(data.1978)</span><span style="font-family:"Cambria",serif"><o:p></o:p></span></p>
<p class="gmail-msonormal" style="margin:0cm;margin-bottom:.0001pt"><span style="font-family:"Arial",sans-serif">effects.1978 <- includeEffects(effects.1978,transTrip,cycle3,</span><span style="font-family:"Cambria",serif"><o:p></o:p></span></p>
<p class="gmail-msonormal" style="margin:0cm;margin-bottom:.0001pt"><span style="font-family:"Arial",sans-serif">                              inPopSqrt,outActSqrt,inActSqrt,name="exports")</span><span style="font-family:"Cambria",serif"><o:p></o:p></span></p>
<p class="gmail-msonormal" style="margin:0cm;margin-bottom:.0001pt"><span style="font-family:"Arial",sans-serif">effects.1978 <- includeEffects(effects.1978,transTrip,cycle3,</span><span style="font-family:"Cambria",serif"><o:p></o:p></span></p>
<p class="gmail-msonormal" style="margin:0cm;margin-bottom:.0001pt"><span style="font-family:"Arial",sans-serif">                              inPopSqrt,outActSqrt,inActSqrt,name="ally")</span><span style="font-family:"Cambria",serif"><o:p></o:p></span></p>
<p class="gmail-msonormal" style="margin:0cm;margin-bottom:.0001pt"><span style="font-family:"Arial",sans-serif">effects.1978 <- includeEffects(effects.1978,crprod,name="ally",interaction1="exports")</span><span style="font-family:"Cambria",serif"><o:p></o:p></span></p>
<p class="gmail-msonormal" style="margin:0cm;margin-bottom:.0001pt"><span style="font-family:"Arial",sans-serif">effects.1978 <- includeEffects(effects.1978,crprod,name="exports",interaction1="ally")</span><span style="font-family:"Cambria",serif"><o:p></o:p></span></p>
<p class="gmail-msonormal" style="margin:0cm;margin-bottom:.0001pt"><span style="font-family:"Arial",sans-serif">effects.1978 <- includeEffects(effects.1978,crprodRecip,name="ally",interaction1="exports")</span><span style="font-family:"Cambria",serif"><o:p></o:p></span></p>
<p class="gmail-msonormal" style="margin:0cm;margin-bottom:.0001pt"><span style="font-family:"Arial",sans-serif">effects.1978 <- includeEffects(effects.1978,crprodRecip,name="exports",interaction1="ally")</span><span style="font-family:"Cambria",serif"><o:p></o:p></span></p>
<p class="gmail-msonormal" style="margin:0cm;margin-bottom:.0001pt"><span style="font-family:"Arial",sans-serif">effects.1978 <- includeEffects(effects.1978,gwespFBMix,name="ally",interaction1="exports")</span><span style="font-family:"Cambria",serif"><o:p></o:p></span></p>
<p class="gmail-msonormal" style="margin:0cm;margin-bottom:.0001pt"><span style="font-family:"Arial",sans-serif">effects.1978 <- includeEffects(effects.1978,gwespFBMix,name="exports",interaction1="ally")</span><span style="font-family:"Cambria",serif"><o:p></o:p></span></p>
<p class="gmail-msonormal" style="margin:0cm;margin-bottom:.0001pt"><span style="font-family:"Arial",sans-serif">effects.1978</span><span style="font-family:"Cambria",serif"><o:p></o:p></span></p>
<p class="gmail-msonormal" style="margin:0cm;margin-bottom:.0001pt"><span style="font-family:"Arial",sans-serif">Alg.1978 <- sienaAlgorithmCreate(projname = 'net1978', seed=123 )</span><span style="font-family:"Cambria",serif"><o:p></o:p></span></p>
<p class="gmail-msonormal" style="margin:0cm;margin-bottom:.0001pt"><span style="font-family:"Arial",sans-serif">ans.1978 <- siena07(Alg.1978, data = data.1978, effects = effects.1978)</span><span style="font-family:"Cambria",serif"><o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-family:"Arial",sans-serif">ans.1978</span><o:p></o:p></p>
<p class="gmail-msonormal" style="margin:0cm;margin-bottom:.0001pt"><span style="font-family:"Arial",sans-serif"> </span><span style="font-family:"Cambria",serif"><o:p></o:p></span></p>
<p class="gmail-msonormal" style="margin:0cm;margin-bottom:.0001pt"><span style="font-family:"Arial",sans-serif"> </span><span style="font-family:"Cambria",serif"><o:p></o:p></span></p>
<p class="gmail-msonormal" style="margin:0cm;margin-bottom:.0001pt"><span style="font-family:"Arial",sans-serif"> </span><span style="font-family:"Cambria",serif"><o:p></o:p></span></p>
<p class="gmail-msonormal" style="margin:0cm;margin-bottom:.0001pt"><span style="font-family:"Cambria",serif"> <o:p></o:p></span></p>
</div>
<div>
<p class="MsoNormal"><span style="font-family:"Arial",sans-serif">************************************<o:p></o:p></span></p>
</div>
<div>
<div>
<div>
<p class="MsoNormal">Robert Faris, PhD<br>
Associate Professor<br>
Department of Sociology<br>
University of California at Davis<br>
2247 Social Sciences and Humanities<br>
One Shields Avenue<br>
Davis, CA 95616<br>
Cell:  510-221-8876<br>
Fax 530-752-0783<br>
<a href="http://sociology.ucdavis.edu/people/rwfaris" target="_blank">http://sociology.ucdavis.edu/people/rwfaris</a>
<o:p></o:p></p>
</div>
</div>
</div>
</div>
</div>
</body>
</html>