
<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=iso-8859-1">

<meta name="Generator" content="Microsoft Word 14 (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:Calibri;

        panose-1:2 15 5 2 2 2 4 3 2 4;}

@font-face

        {font-family:Tahoma;

        panose-1:2 11 6 4 3 5 4 4 2 4;}

@font-face

        {font-family:Verdana;

        panose-1:2 11 6 4 3 5 4 4 2 4;}

/* Style Definitions */

p.MsoNormal, li.MsoNormal, div.MsoNormal

        {margin:0cm;

        margin-bottom:.0001pt;

        font-size:11.0pt;

        font-family:"Calibri","sans-serif";

        mso-fareast-language:EN-US;}

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.MsoAcetate, li.MsoAcetate, div.MsoAcetate

        {mso-style-priority:99;

        mso-style-link:"Texte de bulles Car";

        margin:0cm;

        margin-bottom:.0001pt;

        font-size:8.0pt;

        font-family:"Tahoma","sans-serif";

        mso-fareast-language:EN-US;}

span.EmailStyle17

        {mso-style-type:personal-compose;

        font-family:"Calibri","sans-serif";

        color:windowtext;}

span.TextedebullesCar

        {mso-style-name:"Texte de bulles Car";

        mso-style-priority:99;

        mso-style-link:"Texte de bulles";

        font-family:"Tahoma","sans-serif";}

.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 90.0pt 72.0pt 90.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="FR-CA" link="blue" vlink="purple">

<div class="WordSection1">

<p class="MsoNormal"><span style="font-family:"Courier New"">Hello,<o:p></o:p></span></p>

<p class="MsoNormal"><span style="font-family:"Courier New""><o:p> </o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New"">the following code is extracted from a function where roughly 150 variables of a large data set are transformed using data.table.<o:p></o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New""><o:p> </o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New"">The variable “membre” was coming out with one missing value, in trying to understand why, I extracted the code from the function, added a few “cat” statements and ran it directly in the

 terminal.<o:p></o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New""><o:p> </o:p></span></p>

<p class="MsoNormal"><span style="font-family:"Courier New"">ttt.test.sima[, ":="  (membre = {##<o:p></o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New"">+       cat(" Processing: membre", sep = "\n")<o:p></o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New"">+       ttt <- membre<o:p></o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New"">+       cat(paste(" Class ttt = ", class(ttt), sep = ""), sep = "\n")<o:p></o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New"">+       cat(paste(" Length ttt = ", length(ttt), sep = ""), sep = "\n")<o:p></o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New"">+       cat(paste(" sum(ttt == 0) = ", sum(ttt == "0"), sep = ""), sep = "\n")<o:p></o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New"">+       ttt[ttt == "0"] <- "O"  ## A few capital “O” are coded as zero “0”.<o:p></o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New"">+       cat(paste(" sum(ttt == 0) = ", sum(ttt == "0"), sep = ""), sep = "\n")<o:p></o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New"">+       ttt <- ifelse(PROV != " QC", " OAO",<o:p></o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New"">+                     ifelse(membre == "", " Ma  ", membre))<o:p></o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New"">+       cat(paste(" sum(ttt == 0) = ", sum(ttt == "0"), sep = ""), sep = "\n")<o:p></o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New"">+       merge.levels(factor(ttt, levels = c("O", "N", " Ma  ", " OAO"),<o:p></o:p></span></p>

<p class="MsoNormal"><span style="font-family:"Courier New"">+                           labels = c(" Oui", " Non", " Ma ", " OAO")),<o:p></o:p></span></p>

<p class="MsoNormal"><span style="font-family:"Courier New"">+                    k = list(" Oui" = c(" Oui", " OAO")))})]<o:p></o:p></span></p>

<p class="MsoNormal"><span style="font-family:"Courier New""></span><span lang="EN-US" style="font-family:"Courier New"">Processing: membre<o:p></o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New"">Class ttt = character<o:p></o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New"">Length ttt = 4750880<o:p></o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New"">sum(ttt == 0) = 2<o:p></o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New"">sum(ttt == 0) = 0<o:p></o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New"">sum(ttt == 0) = 1<o:p></o:p></span></p>

<p class="MsoNormal"><span style="font-family:"Courier New""><o:p> </o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New"">I don’t understand why after the Ť ifelseť statement the temporary variable Ť tttť is back with a single Ť 0 (zero)ť in it, resulting of course in the missing value of the factor created

 from it.<o:p></o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New""><o:p> </o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New"">Thanks for your support,<o:p></o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New""><o:p> </o:p></span></p>

<p class="MsoNormal"><span lang="EN-US" style="font-family:"Courier New"">Gérald<o:p></o:p></span></p>

<p class="MsoNormal"><span lang="EN-US"><o:p> </o:p></span></p>

<table class="MsoNormalTable" border="0" cellpadding="0" width="640" style="width:480.0pt">

<tbody>

<tr>

<td style="padding:.75pt .75pt .75pt .75pt">

<p class="MsoNormal"><span style="mso-fareast-language:FR-CA"><img width="136" height="54" id="_x0000_i1025" src="cid:image001.gif@01D08E2D.142361C0"></span><span style="font-size:12.0pt;mso-fareast-language:FR-CA"><o:p></o:p></span></p>

</td>

<td style="padding:.75pt .75pt .75pt .75pt"></td>

<td style="padding:.75pt .75pt .75pt .75pt"></td>

</tr>

<tr>

<td width="300" valign="top" style="width:225.0pt;padding:.75pt .75pt .75pt .75pt">

<p class="MsoNormal"><b><span style="font-size:8.0pt;font-family:"Verdana","sans-serif";color:black;mso-fareast-language:FR-CA">Gerald Jean, M. Sc. en statistiques</span></b><span style="font-size:8.0pt;font-family:"Verdana","sans-serif";color:black;mso-fareast-language:FR-CA"><br>

Conseiller senior en statistiques<br>

<br>

Actuariat corporatif,<br>

Modélisation et Recherche<br>

Assurance de dommages<br>

Mouvement Desjardins</span><span style="font-size:12.0pt;mso-fareast-language:FR-CA"><o:p></o:p></span></p>

</td>

<td width="170" valign="top" style="width:127.5pt;padding:.75pt .75pt .75pt .75pt">

<p class="MsoNormal"><span style="font-size:8.0pt;font-family:"Verdana","sans-serif";color:black;mso-fareast-language:FR-CA"><br>

Lévis (sičge social)<br>

<br>

418 835-4900,<o:p></o:p></span></p>

<p class="MsoNormal"><span style="font-size:8.0pt;font-family:"Verdana","sans-serif";color:black;mso-fareast-language:FR-CA">poste 5527639<br>

1 877 835-4900, <o:p></o:p></span></p>

<p class="MsoNormal"><span style="font-size:8.0pt;font-family:"Verdana","sans-serif";color:black;mso-fareast-language:FR-CA">poste 5527639<br>

Télécopieur : 418 835-6657</span><span style="font-size:12.0pt;mso-fareast-language:FR-CA"><o:p></o:p></span></p>

</td>

<td width="170" valign="top" style="width:127.5pt;padding:.75pt .75pt .75pt .75pt">

<p class="MsoNormal" style="margin-bottom:12.0pt"><span style="font-size:8.0pt;font-family:"Verdana","sans-serif";color:black;mso-fareast-language:FR-CA"><br>

<br>

<br>

<br>

</span><span style="font-size:12.0pt;mso-fareast-language:FR-CA"><o:p></o:p></span></p>

</td>

</tr>

</tbody>

</table>

<p class="MsoNormal"><span style="display:none;mso-fareast-language:FR-CA"><o:p> </o:p></span></p>

<table class="MsoNormalTable" border="0" cellpadding="0" width="640" style="width:480.0pt">

<tbody>

<tr>

<td style="padding:.75pt .75pt .75pt .75pt">

<p class="MsoNormal"><span style="font-size:7.0pt;font-family:"Verdana","sans-serif";color:black;mso-fareast-language:FR-CA">Faites bonne impression et imprimez seulement au besoin!<br>

<br>

</span><span style="font-size:7.0pt;font-family:"Verdana","sans-serif";color:dimgray;mso-fareast-language:FR-CA">Ce courriel est confidentiel, peut ętre protégé par le secret professionnel et est adressé exclusivement au destinataire. Il est strictement interdit

 ŕ toute autre personne de diffuser, distribuer ou reproduire ce message. Si vous l'avez reçu par erreur, veuillez immédiatement le détruire et aviser l'expéditeur. Merci.</span><span style="font-size:12.0pt;mso-fareast-language:FR-CA"><o:p></o:p></span></p>

</td>

</tr>

</tbody>

</table>

<p class="MsoNormal"><span style="mso-fareast-language:FR-CA"><o:p> </o:p></span></p>

<p class="MsoNormal"><o:p> </o:p></p>

</div>

</body>

</html>