The R Project SVN R

Rev

Rev 29985 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 29985 Rev 30129
Line 445... Line 445...
445
			fromDeviceWidth(toDeviceWidth(1.0, GE_NDC, gdd),
445
			fromDeviceWidth(toDeviceWidth(1.0, GE_NDC, gdd),
446
					GE_INCHES, gdd),
446
					GE_INCHES, gdd),
447
			fromDeviceHeight(toDeviceHeight(-1.0, GE_NDC, gdd),
447
			fromDeviceHeight(toDeviceHeight(-1.0, GE_NDC, gdd),
448
					 GE_INCHES, gdd),
448
					 GE_INCHES, gdd),
449
			((gadesc*) dd->deviceSpecific)->basefontsize,
449
			((gadesc*) dd->deviceSpecific)->basefontsize,
450
			1, "R Graphics Output"))
450
			1, "R Graphics Output", R_NilValue, 1, 4))
451
	PrivateCopyDevice(dd, ndd, "PDF");
451
	PrivateCopyDevice(dd, ndd, "PDF");
452
}
452
}
453
 
453
 
454
 
454
 
455
 
455