axis() produces junk on DEC alpha (PR#274)

About this list Date view Thread view Subject view Author view Other groups

Subject: axis() produces junk on DEC alpha (PR#274)
albrecht.gebhardt@uni-klu.ac.at
Date: Mon 13 Sep 1999 - 11:02:22 EST


Message-Id: <199909130102.DAA16878@pubhealth.ku.dk>

Full_Name: Albrecht Gebhardt
Version: 0.65.0
OS: Digital Unix 4.0E
Submission from: (NULL) (212.17.104.62)

Plottimg on the Alpha stopped working with 0.65.0.

The tickmarks have a length of -Inf and go across the whole
plot.

A first solution is the following patch:

--- src/main/plot.c.alpha-patch Mon Sep 13 01:37:11 1999
+++ src/main/plot.c Mon Sep 13 01:58:16 1999
@@ -832,7 +832,7 @@
        }
        dd->gp.col = fg;
        GLine(REAL(at)[0], y, REAL(at)[n - 1], y, USER, dd);
- if (R_FINITE(dd->gp.tck)) {
+ if (R_FINITE(dd->gp.tck) && !(ISNAN(dd->gp.tck))) {
            /* The S way of doing ticks */
            double y0, y1;
            if (dd->gp.tck > 0.5) {
@@ -922,7 +922,7 @@
        }
        dd->gp.col = fg;
        GLine(x, REAL(at)[0], x, REAL(at)[n - 1], USER, dd);
- if (R_FINITE(dd->gp.tck)) {
+ if (R_FINITE(dd->gp.tck) && !(ISNAN(dd->gp.tck))) {
            /* The S way of doing ticks */
            double x0, x1;
            if (dd->gp.tck > 0.5) {

Albrecht Gebhardt

-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
r-devel mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !) To: r-devel-request@stat.math.ethz.ch
_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._


About this list Date view Thread view Subject view Author view Other groups

This archive was generated by hypermail 2b25 : Tue 04 Jan 2000 - 14:16:08 EST