<div dir="ltr">Hi Yurii,<div><br></div><div>Good suggestion, anyway I will rewrite scripts in proper way (according to Genabel standards for code formatting).</div><div class="gmail_extra"><br></div><div class="gmail_extra"><div><div class="gmail_signature">With kind regards, Yakov Tsepilov.<br>                        </div></div>
<br><div class="gmail_quote">2015-07-08 21:50 GMT+06:00 Yurii Aulchenko <span dir="ltr"><<a href="mailto:yurii.aulchenko@gmail.com" target="_blank">yurii.aulchenko@gmail.com</a>></span>:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Hi nd_0001! (Yakov?)<br>
<br>
“no/one measurement” as diagnostic comment may be confusing for the user; and then you say “number of points is too small”, apparently also relating to the npt<br>
<br>
Looking in the documentation, I assume that npt is length of<br>
<br>
data: Input vector of Chi square statistic<br>
<br>
so why not calling it the way people know form the doc? e.g.<br>
<br>
“input vector ‘data’ has zero-length” and so on?<br>
<span class="HOEnZb"><font color="#888888"><br>
Yurii<br>
</font></span><div class="HOEnZb"><div class="h5"><br>
> On 08 Jul 2015, at 17:44, <a href="mailto:noreply@r-forge.r-project.org">noreply@r-forge.r-project.org</a> wrote:<br>
><br>
> Author: nd_0001<br>
> Date: 2015-07-08 17:44:48 +0200 (Wed, 08 Jul 2015)<br>
> New Revision: 2000<br>
><br>
> Modified:<br>
>   pkg/GenABEL/R/VIFGC_ovdom.R<br>
> Log:<br>
> Minor changes in GC functions, need to rewrite. Also catched 2000th revision=)<br>
><br>
> Modified: pkg/GenABEL/R/VIFGC_ovdom.R<br>
> ===================================================================<br>
> --- pkg/GenABEL/R/VIFGC_ovdom.R       2015-07-08 07:36:58 UTC (rev 1999)<br>
> +++ pkg/GenABEL/R/VIFGC_ovdom.R       2015-07-08 15:44:48 UTC (rev 2000)<br>
> @@ -136,8 +136,9 @@<br>
>     if (ntp < 1)<br>
>         stop("no valid measurments")<br>
>     if (ntp == 1) {<br>
> -        warning(paste("One measurment, Lambda = 1 returned"))<br>
> -        return(list(estimate = 1, se = 999.99))<br>
> +        stop("Only one measurment. Stoped.")<br>
> +        #warning(paste("One measurment, Lambda = 1 returned"))<br>
> +        #return(list(estimate = 1, se = 999.99))<br>
>     }<br>
>     if (ntp < 10)<br>
>         warning(paste("number of points is too small:", ntp))<br>
><br>
> _______________________________________________<br>
> Genabel-commits mailing list<br>
> <a href="mailto:Genabel-commits@lists.r-forge.r-project.org">Genabel-commits@lists.r-forge.r-project.org</a><br>
> <a href="https://lists.r-forge.r-project.org/cgi-bin/mailman/listinfo/genabel-commits" rel="noreferrer" target="_blank">https://lists.r-forge.r-project.org/cgi-bin/mailman/listinfo/genabel-commits</a><br>
<br>
_______________________________________________<br>
Genabel-commits mailing list<br>
<a href="mailto:Genabel-commits@lists.r-forge.r-project.org">Genabel-commits@lists.r-forge.r-project.org</a><br>
<a href="https://lists.r-forge.r-project.org/cgi-bin/mailman/listinfo/genabel-commits" rel="noreferrer" target="_blank">https://lists.r-forge.r-project.org/cgi-bin/mailman/listinfo/genabel-commits</a></div></div></blockquote></div><br></div></div>