The R Project SVN R

Rev

Rev 13400 | Rev 16224 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 13400 Rev 15168
Line 2965... Line 2965...
2965
	}
2965
	}
2966
	subcoords = USER;
2966
	subcoords = USER;
2967
    }
2967
    }
2968
    /* Note: I changed dd->gp.yLineBias to 0.3 here. */
2968
    /* Note: I changed dd->gp.yLineBias to 0.3 here. */
2969
    /* Purely visual tuning. RI */
2969
    /* Purely visual tuning. RI */
-
 
2970
    /* Note: I removed the 0.3 fiddle here because mathematical 
-
 
2971
     * annotation stuff can do "exact" centering.
-
 
2972
     * i.e., 0.3 fiddle is effectively replaced by yadj=0.5
-
 
2973
     */
2970
    switch(side) {
2974
    switch(side) {
2971
    case 1:
2975
    case 1:
2972
	if(las == 2 || las == 3) {
2976
	if(las == 2 || las == 3) {
2973
	    at = at + GConvertXUnits(0.3, LINES, subcoords, dd);
-
 
2974
	    angle = 90;
2977
	    angle = 90;
2975
	    yadj = 0.5;
2978
	    yadj = 0.5;
2976
	}
2979
	}
2977
	else {
2980
	else {
2978
	    line = line + 1 - dd->gp.yLineBias;
2981
	    line = line + 1 - dd->gp.yLineBias;
Line 2980... Line 2983...
2980
	    yadj = NA_REAL;
2983
	    yadj = NA_REAL;
2981
	}
2984
	}
2982
	break;
2985
	break;
2983
    case 2:
2986
    case 2:
2984
	if(las == 1 || las == 2) {
2987
	if(las == 1 || las == 2) {
2985
	    at = at - GConvertYUnits(0.3, LINES, subcoords, dd);
-
 
2986
	    angle = 0;
2988
	    angle = 0;
2987
	    yadj = 0.5;
2989
	    yadj = 0.5;
2988
	}
2990
	}
2989
	else {
2991
	else {
2990
	    line = line + dd->gp.yLineBias;
2992
	    line = line + dd->gp.yLineBias;
Line 2992... Line 2994...
2992
	    yadj = NA_REAL;
2994
	    yadj = NA_REAL;
2993
	}
2995
	}
2994
	break;
2996
	break;
2995
    case 3:
2997
    case 3:
2996
	if(las == 2 || las == 3) {
2998
	if(las == 2 || las == 3) {
2997
	    at = at + GConvertXUnits(0.3, LINES, subcoords, dd);
-
 
2998
	    angle = 90;
2999
	    angle = 90;
2999
	    yadj = 0.5;
3000
	    yadj = 0.5;
3000
	}
3001
	}
3001
	else {
3002
	else {
3002
	    line = line + dd->gp.yLineBias;
3003
	    line = line + dd->gp.yLineBias;
Line 3004... Line 3005...
3004
	    yadj = NA_REAL;
3005
	    yadj = NA_REAL;
3005
	}
3006
	}
3006
	break;
3007
	break;
3007
    case 4:
3008
    case 4:
3008
	if(las == 1 || las == 2) {
3009
	if(las == 1 || las == 2) {
3009
	    at = at - GConvertYUnits(0.3, LINES, subcoords, dd);
-
 
3010
	    angle = 0;
3010
	    angle = 0;
3011
	    yadj = 0.5;
3011
	    yadj = 0.5;
3012
	}
3012
	}
3013
	else {
3013
	else {
3014
	    line = line + 1 - dd->gp.yLineBias;
3014
	    line = line + 1 - dd->gp.yLineBias;