<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=Windows-1252">
<style type="text/css" style="">
<!--
p
{margin-top:0;
margin-bottom:0}
-->
</style>
</head>
<body dir="ltr">
<style>
<!--
@font-face
{font-family:"Cambria Math"}
@font-face
{font-family:Calibri}
p.MsoNormal, li.MsoNormal, div.MsoNormal
{margin:0in;
margin-bottom:.0001pt;
font-size:11.0pt;
font-family:"Calibri",sans-serif}
a:link, span.MsoHyperlink
{color:blue;
text-decoration:underline}
a:visited, span.MsoHyperlinkFollowed
{color:#954F72;
text-decoration:underline}
p
{margin:0in;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:"Times New Roman",serif}
.MsoChpDefault
{}
@page WordSection1
{margin:1.0in 1.0in 1.0in 1.0in}
div.WordSection1
{}
-->
</style>
<div class="WordSection1">
<p class="MsoNormal">Thanks Danny,</p>
<p class="MsoNormal"> </p>
<p class="MsoNormal">I think that would be great. My company often encourages us to contribute back to OSS projects and it helps my case to be shown as a contributor to rNOMADS. I should be able to disclose at least some if not all of the code after our project
with our current client is complete.</p>
<p class="MsoNormal"> </p>
<p class="MsoNormal"><b><i>Also, a bug that I came across in your code that you may be interested in:</i></b></p>
<p class="MsoNormal">profile.data[[k]] <- BuildProfile(gridded.data, lon[k],</p>
<p class="MsoNormal"> lat[k], spatial.average)[l.i$ix, ]
</p>
<p class="MsoNormal">#The [l.i$ix, ] works when using spatial averaging but not nearest neighbor.
</p>
<p class="MsoNormal">#So, either there would be a check here to see if spatial averaging is used or the matrix needs to be the same between the two methods</p>
<p class="MsoNormal"> </p>
<p class="MsoNormal">#\/ \/ ##########in BuildProfile####################\/ \/</p>
<p class="MsoNormal">#This will create a 1 x 5 matrix for me since I wave one level and 5 variables</p>
<p class="MsoNormal">if (spatial.average) {</p>
<p class="MsoNormal"> for (k in seq_len(length(gridded.data$levels))) {</p>
<p class="MsoNormal"> for (j in seq_len(length(gridded.data$variables))) {</p>
<p class="MsoNormal"> layer.img <- t(rbind(as.vector(cart.pts$x), as.vector(cart.pts$y[nrow(cart.pts$y):1,
</p>
<p class="MsoNormal"> ]), as.vector(t(gridded.data$z[k, j, , ]))))</p>
<p class="MsoNormal"> profile.data[k, j] <- MBA::mba.points(layer.img, </p>
<p class="MsoNormal"> cbind(0, 0))[[1]][3]</p>
<p class="MsoNormal"> }</p>
<p class="MsoNormal"> }</p>
<p class="MsoNormal"> }</p>
<p class="MsoNormal">#This will create a list of 5 elements where there isn’t an explicit enumeration for the single level.</p>
<p class="MsoNormal"> else {</p>
<p class="MsoNormal"> cart.dist <- sqrt(cart.pts$x^2 + cart.pts$y^2)</p>
<p class="MsoNormal"> node.ind <- rev(which(cart.dist[nrow(cart.dist):1, ] == </p>
<p class="MsoNormal"> min(cart.dist), arr.ind = TRUE))</p>
<p class="MsoNormal"> profile.data <- gridded.data$z[, , node.ind[1], node.ind[2]] #THIS IS THE OFFENDING CODE</p>
<p class="MsoNormal"> #redundant spatial.average.method <- "Nearest Node"</p>
<p class="MsoNormal"> }</p>
<p class="MsoNormal"> </p>
<p class="MsoNormal"> </p>
<p class="MsoNormal">Ruben Kertesz, Ph.D.<br>
Environmental Engineer<br>
EmNet LLC<br>
121 S. Niles Ave.<br>
Suite #22<br>
South Bend, IN 46617<br>
Office: 574.855.1012 x115<br>
<br>
<span style="font-size:12.0pt; font-family:"Times New Roman",serif"></span></p>
<div style="border:none; border-top:solid #E1E1E1 1.0pt; padding:3.0pt 0in 0in 0in">
<p class="MsoNormal" style="border:none; padding:0in"><b>From: </b><a href="mailto:haksaeng@live.unc.edu">Bowman, Daniel</a><br>
<b>Sent: </b>Monday, March 14, 2016 8:56 PM<br>
<b>To: </b><a href="mailto:rnomads-user@lists.r-forge.r-project.org">Announcements, feature requests, and help using rNOMADS</a><br>
<b>Subject: </b>Re: [Rnomads-user] bug fixes / feature requests for new rNOMADS version?</p>
</div>
<p class="MsoNormal"><span style="font-size:12.0pt; font-family:"Times New Roman",serif"> </span></p>
</div>
<div>
<div id="divtagdefaultwrapper" style="font-size:12pt; color:#000000; background-color:#FFFFFF; font-family:Calibri,Arial,Helvetica,sans-serif">
<p>Hi Ruben,</p>
<p><br>
</p>
<p>Thanks for the suggestion, and sorry for the late reply. I'd be happy to change the order except that I do not used named arguments in my paper. So, if I were to change the order, it would break my examples! <br>
</p>
<p><br>
</p>
<p>I'm very interested in seeing your version of ReadGrib, are you willing to have it added to rNOMADS? I'd add you as a contributor to the package.</p>
<p><br>
</p>
<p>Best,</p>
<p><br>
Danny<br>
</p>
<p><br>
</p>
<div id="Signature">
<div id="divtagdefaultwrapper" style="font-size:12pt; color:#000000; background-color:#FFFFFF; font-family:Calibri,Arial,Helvetica,sans-serif">
<div name="divtagdefaultwrapper" style="font-family:Calibri,Arial,Helvetica,sans-serif; font-size:; margin:0">
Daniel C. Bowman<br>
Doctoral Candidate in Geophysics<br>
UNC Chapel Hill<br>
phone: 575-418-8555<br>
<b>curriculum vitae</b>: http://www.unc.edu/~haksaeng/curriculum_vitae/bowman_cv.pdf
<br>
<b>LinkedIn</b>: <a id="LPNoLP" title="Ctrl+Click or tap to follow the link" href="https://www.linkedin.com/in/dannycbowman" class="view-public-profile">
https://www.linkedin.com/in/dannycbowman</a><br>
web:http://geosci.unc.edu/page/daniel-c-bowman<br>
twitter: @dannycbowman<br>
<br>
</div>
</div>
</div>
<br>
<br>
<div style="color:rgb(0,0,0)">
<hr tabindex="-1" style="display:inline-block; width:98%">
<div id="divRplyFwdMsg" dir="ltr"><font face="Calibri, sans-serif" color="#000000" style="font-size:11pt"><b>From:</b> rnomads-user-bounces@lists.r-forge.r-project.org <rnomads-user-bounces@lists.r-forge.r-project.org> on behalf of Ruben Kertesz <rkertesz@emnet.net><br>
<b>Sent:</b> Wednesday, March 9, 2016 3:45 PM<br>
<b>To:</b> Announcements, feature requests, and help using rNOMADS<br>
<b>Subject:</b> Re: [Rnomads-user] bug fixes / feature requests for new rNOMADS version?</font>
<div> </div>
</div>
<div>
<div>Not a bug but a suggestion. It would be nice to set up the ReadGrib function to get passed variables, then levels. I know we can explicitly define them and then use whatever order we like but I see that in the function we execute commands using variables
then levels. Why not by default pass them to the function in the same way? Surprisingly, the order of string construction using -match is fairly important and it needs variables then levels. </div>
<div><br>
</div>
<div>FYI: I am doing some major adding to the ReadGrib function to let me use gridded variables and multiple time horizons for the NARRE data that isn't currently possible. Also, I found a neat function in wgrib2 to generate a regular grid for the NARRE data
(to answer a previous q I posted to the list). You probably are just as well off doing this using an r mapping function however. <br>
<br>
<div class="acompli_signature">Ruben Kertesz, Ph.D. <br>
Environmental Engineer <br>
EmNet LLC <br>
Office: <a dir="ltr" href="tel:574.855.1012;115">574.855.1012 x115</a></div>
<br>
</div>
<br>
<br>
<br>
<div class="gmail_quote">On Tue, Mar 8, 2016 at 6:50 PM -0800, "Bowman, Daniel" <span dir="ltr">
<<a href="mailto:haksaeng@live.unc.edu" target="_blank">haksaeng@live.unc.edu</a>></span> wrote:<br>
<br>
</div>
<div>
<div id="divtagdefaultwrapper" style="font-size:12pt; color:#000000; background-color:#FFFFFF; font-family:Calibri,Arial,Helvetica,sans-serif">
<p>Hello all,</p>
<p><br>
</p>
<p>I'm hoping to release a new version of rNOMADS soon, and I'd like to know if there are any outstanding issues or feature requests that you'd like to see. Currently there are some problems involving making profiles, and I'll be addressing those.</p>
<p><br>
</p>
<p>Best,</p>
<p><br>
</p>
<p>Danny<br>
</p>
<p><br>
</p>
<p><br>
</p>
<div id="Signature">
<div id="divtagdefaultwrapper" style="font-size:12pt; color:#000000; background-color:#FFFFFF; font-family:Calibri,Arial,Helvetica,sans-serif">
<div name="divtagdefaultwrapper" style="font-family:Calibri,Arial,Helvetica,sans-serif; font-size:; margin:0">
Daniel C. Bowman<br>
Doctoral Candidate in Geophysics<br>
UNC Chapel Hill<br>
phone: 575-418-8555<br>
<b>curriculum vitae</b>: http://www.unc.edu/~haksaeng/curriculum_vitae/bowman_cv.pdf
<br>
<b>LinkedIn</b>: <a id="LPNoLP" title="Ctrl+Click or tap to follow the link" href="https://www.linkedin.com/in/dannycbowman" class="view-public-profile">
https://www.linkedin.com/in/dannycbowman</a><br>
web:http://geosci.unc.edu/page/daniel-c-bowman<br>
twitter: @dannycbowman<br>
<br>
</div>
</div>
</div>
</div>
</div>
</div>
</div>
</div>
</div>
</body>
</html>