<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=us-ascii">
<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:"Lucida Console";
        panose-1:2 11 6 9 4 5 4 2 2 4;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
        {margin:0in;
        margin-bottom:.0001pt;
        font-size:11.0pt;
        font-family:"Calibri",sans-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;}
pre
        {mso-style-priority:99;
        mso-style-link:"HTML Preformatted Char";
        margin:0in;
        margin-bottom:.0001pt;
        font-size:10.0pt;
        font-family:"Courier New";}
span.EmailStyle17
        {mso-style-type:personal-compose;
        font-family:"Calibri",sans-serif;
        color:windowtext;}
span.HTMLPreformattedChar
        {mso-style-name:"HTML Preformatted Char";
        mso-style-priority:99;
        mso-style-link:"HTML Preformatted";
        font-family:"Courier New";}
span.gcwxi2kcpkb
        {mso-style-name:gcwxi2kcpkb;}
span.gcwxi2kcpjb
        {mso-style-name:gcwxi2kcpjb;}
span.gcwxi2kcdkb
        {mso-style-name:gcwxi2kcdkb;}
.MsoChpDefault
        {mso-style-type:export-only;
        font-family:"Calibri",sans-serif;}
@page WordSection1
        {size:8.5in 11.0in;
        margin:1.0in 1.0in 1.0in 1.0in;}
div.WordSection1
        {page:WordSection1;}
--></style><!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1027" />
</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-US" link="#0563C1" vlink="#954F72">
<div class="WordSection1">
<p class="MsoNormal">Dear TraMineR Users,<o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">I would like to loop through many sets of clustering results produced with wcKMedRange and produce a plot for each one.  Without the loop, the code would look like this:<o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">plot(pamomf2i5q.w, stat=c("ASWw","HC", "R2", "PBC", "HG"), legendpos="topright", norm="zscore")<o:p></o:p></p>
<p class="MsoNormal">plot(pamwardomf2i5q.w, stat=c("ASWw","HC", "R2", "PBC", "HG"), legendpos="topright", norm="zscore")<o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">When I try to put this in a loop, I get the error messages below suggesting that R is expecting a y value in the plot command.  Is there something wrong with my loop that is causing this problem?<o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">Thanks,<o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">Jeremy<o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal" style="line-height:11.25pt;background:white;word-break:break-all">
<span style="font-size:10.0pt;font-family:"Lucida Console";color:blue">> stats <- c("pamomf2i5q.w", "pamwardomf2i5q.w")<o:p></o:p></span></p>
<p class="MsoNormal" style="line-height:11.25pt;background:white;word-break:break-all">
<span style="font-size:10.0pt;font-family:"Lucida Console";color:blue">> for (i in unique(stats)) {<o:p></o:p></span></p>
<p class="MsoNormal" style="line-height:11.25pt;background:white;word-break:break-all">
<span style="font-size:10.0pt;font-family:"Lucida Console";color:blue">+   plot(stats[i], stat=c("ASW","HC", "R2", "PBC", "HG"), legendpos="topright", norm="zscore")<o:p></o:p></span></p>
<p class="MsoNormal" style="line-height:11.25pt;background:white;word-break:break-all">
<span style="font-size:10.0pt;font-family:"Lucida Console";color:blue">+ }<o:p></o:p></span></p>
<p class="MsoNormal" style="mso-line-height-alt:7.5pt;background:#E5E5E5;word-break:break-all">
<!--[if gte vml 1]><v:shapetype id="_x0000_t75" coordsize="21600,21600" o:spt="75" o:preferrelative="t" path="m@4@5l@4@11@9@11@9@5xe" filled="f" stroked="f">
<v:stroke joinstyle="miter" />
<v:formulas>
<v:f eqn="if lineDrawn pixelLineWidth 0" />
<v:f eqn="sum @0 1 0" />
<v:f eqn="sum 0 0 @1" />
<v:f eqn="prod @2 1 2" />
<v:f eqn="prod @3 21600 pixelWidth" />
<v:f eqn="prod @3 21600 pixelHeight" />
<v:f eqn="sum @0 0 1" />
<v:f eqn="prod @6 1 2" />
<v:f eqn="prod @7 21600 pixelWidth" />
<v:f eqn="sum @8 21600 0" />
<v:f eqn="prod @7 21600 pixelHeight" />
<v:f eqn="sum @10 21600 0" />
</v:formulas>
<v:path o:extrusionok="f" gradientshapeok="t" o:connecttype="rect" />
<o:lock v:ext="edit" aspectratio="t" />
</v:shapetype><v:shape id="Rectangle_x0020_1" o:spid="_x0000_s1026" type="#_x0000_t75" alt="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAKUlEQVR42mNgQAKi65/9Z8AHQApgmKACrAqxKcBpIkHryFJEstsYiAUAKIxac8kmY3AAAAAASUVORK5CYII=" style='width:6.75pt;height:6.75pt;visibility:visible;mso-left-percent:-10001;mso-top-percent:-10001;mso-position-horizontal:absolute;mso-position-horizontal-relative:char;mso-position-vertical:absolute;mso-position-vertical-relative:line;mso-left-percent:-10001;mso-top-percent:-10001'>
<w:wrap type="none"/>
<w:anchorlock/>
</v:shape><![endif]--><![if !vml]><img width="9" height="9" style="width:.0937in;height:.0937in" src="cid:image001.png@01D220EB.E0518D10" alt="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAAKUlEQVR42mNgQAKi65/9Z8AHQApgmKACrAqxKcBpIkHryFJEstsYiAUAKIxac8kmY3AAAAAASUVORK5CYII=" v:shapes="Rectangle_x0020_1"><![endif]><span style="font-size:10.0pt;font-family:"Lucida Console";color:black">
 Show Traceback<o:p></o:p></span></p>
<p class="MsoNormal" style="mso-line-height-alt:7.5pt;background:#E5E5E5;word-break:break-all">
<span style="font-size:10.0pt;font-family:"Lucida Console";color:black"><o:p></o:p></span></p>
<p class="MsoNormal" style="mso-line-height-alt:7.5pt;background:#E5E5E5;word-break:break-all">
<span style="font-size:10.0pt;font-family:"Lucida Console";color:black"> Rerun with Debug<o:p></o:p></span></p>
<p class="MsoNormal" style="line-height:11.25pt;background:#E5E5E5;word-break:break-all">
<span style="font-size:10.0pt;font-family:"Lucida Console";color:black"><o:p></o:p></span></p>
<p class="MsoNormal" style="line-height:11.25pt;background:#E5E5E5;word-break:break-all">
<span style="font-size:10.0pt;font-family:"Lucida Console";color:#C5060B">Error in plot.window(...) : need finite 'ylim' values<o:p></o:p></span></p>
<p class="MsoNormal" style="line-height:11.25pt;background:#E5E5E5;word-break:break-all">
<span style="font-size:10.0pt;font-family:"Lucida Console";color:black"><o:p></o:p></span></p>
<p class="MsoNormal" style="line-height:11.25pt;background:white;word-break:break-all">
<span style="font-size:10.0pt;font-family:"Lucida Console";color:#C5060B">In addition: Warning messages:<o:p></o:p></span></p>
<p class="MsoNormal" style="line-height:11.25pt;background:white;word-break:break-all">
<span style="font-size:10.0pt;font-family:"Lucida Console";color:#C5060B">1: In min(x) : no non-missing arguments to min; returning Inf<o:p></o:p></span></p>
<p class="MsoNormal" style="line-height:11.25pt;background:white;word-break:break-all">
<span style="font-size:10.0pt;font-family:"Lucida Console";color:#C5060B">2: In max(x) : no non-missing arguments to max; returning -Inf<o:p></o:p></span></p>
<p class="MsoNormal" style="line-height:11.25pt;background:white;word-break:break-all">
<span style="font-size:10.0pt;font-family:"Lucida Console";color:#C5060B">3: In plot.window(...) : "stat" is not a graphical parameter<o:p></o:p></span></p>
<p class="MsoNormal" style="line-height:11.25pt;background:white;word-break:break-all">
<span style="font-size:10.0pt;font-family:"Lucida Console";color:#C5060B">4: In plot.window(...) : "legendpos" is not a graphical parameter<o:p></o:p></span></p>
<p class="MsoNormal" style="line-height:11.25pt;background:white;word-break:break-all">
<span style="font-size:10.0pt;font-family:"Lucida Console";color:#C5060B">5: In plot.window(...) : "norm" is not a graphical parameter</span><span style="font-size:10.0pt;font-family:"Lucida Console";color:black"><o:p></o:p></span></p>
<p class="MsoNormal"><o:p> </o:p></p>
</div>
</body>
</html>