[Rd] Comment on (PR#13373)

[cmr.pent at gmail.com]

------=_Part_26951_7337931.1229163663746
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 7bit
Content-Disposition: inline

Dear R maintainer!

> User misread: it reduces the *base* cex.

It's not quite clear what the base cex is. Having read help(par), I
got the impression that it is the raw value of par(cex) as opposed to
the value multiplied by the value of cex argument which can be passed
to some functions. As you can see from my example, the value of
par(cex) is *reset*, not reduced.

> Setting a layout does reset cex.

Setting a layout using split.screen does not.

I still think it's a graphics bug, not a documentation bug. I've
attached a patch that modifies the behavior of par() and layout()
functions. Please review it and tell me in which cases the original
behavior was more appropriate.

I'm ready to provide any additional info,
Andrey

------=_Part_26951_7337931.1229163663746
Content-Type: text/x-diff; name=layout.patch
Content-Transfer-Encoding: base64
X-Attachment-Id: f_foo43ev90
Content-Disposition: attachment; filename=layout.patch

KioqIC9ob21lL3BlbnQvci1iYXNlLTIuOC4wL3NyYy9tYWluL3Bhci5jCTIwMDgtMDktMjIgMDI6
MDU6MjYuMDAwMDAwMDAwICswNDAwCi0tLSAvaG9tZS9wZW50L3ItYmFzZS0yLjguMC9zcmMvbWFp
bi9wYXIuYy5wYXRjaGVkCTIwMDgtMTItMTMgMTM6MTM6NDcuMDAwMDAwMDAwICswMzAwCioqKioq
KioqKioqKioqKgoqKiogNDIyLDQzNiAqKioqCiAgCVJfREVWXzIoZGVmYXVsdEZpZ3VyZSkgPSBU
UlVFOwogIAlSX0RFVl8yKGxheW91dCkgPSBGQUxTRTsKICAJaWYgKG5yb3cgPiAyIHx8IG5jb2wg
PiAyKSB7CiEgCSAgICBSX0RFVl8yKGNleGJhc2UpID0gMC42NjsKICAJICAgIFJfREVWXzIobWV4
KSA9IDEuMDsKICAJfQogIAllbHNlIGlmIChucm93ID09IDIgJiYgbmNvbCA9PSAyKSB7CiEgCSAg
ICBSX0RFVl8yKGNleGJhc2UpID0gMC44MzsKICAJICAgIFJfREVWXzIobWV4KSA9IDEuMDsKICAJ
fQogIAllbHNlIHsKISAJICAgIFJfREVWXzIoY2V4YmFzZSkgPSAxLjA7CiAgCSAgICBSX0RFVl8y
KG1leCkgPSAxLjA7CiAgCX0KICAJUl9ERVZfXyhtZmluZCkgPSAwOwotLS0gNDIyLDQzNiAtLS0t
CiAgCVJfREVWXzIoZGVmYXVsdEZpZ3VyZSkgPSBUUlVFOwogIAlSX0RFVl8yKGxheW91dCkgPSBG
QUxTRTsKICAJaWYgKG5yb3cgPiAyIHx8IG5jb2wgPiAyKSB7CiEgCSAgICBSX0RFVl8yKGNleGJh
c2UpID0gMC42NipSX0RFVl8yKGNleGJhc2UpOwogIAkgICAgUl9ERVZfMihtZXgpID0gMS4wOwog
IAl9CiAgCWVsc2UgaWYgKG5yb3cgPT0gMiAmJiBuY29sID09IDIpIHsKISAJICAgIFJfREVWXzIo
Y2V4YmFzZSkgPSAwLjgzKlJfREVWXzIoY2V4YmFzZSk7CiAgCSAgICBSX0RFVl8yKG1leCkgPSAx
LjA7CiAgCX0KICAJZWxzZSB7CiEgCSAgICBSX0RFVl8yKGNleGJhc2UpID0gMS4wKlJfREVWXzIo
Y2V4YmFzZSk7CiAgCSAgICBSX0RFVl8yKG1leCkgPSAxLjA7CiAgCX0KICAJUl9ERVZfXyhtZmlu
ZCkgPSAwOwoqKioqKioqKioqKioqKioKKioqIDQ1MSw0NjUgKioqKgogIAlSX0RFVl8yKGRlZmF1
bHRGaWd1cmUpID0gVFJVRTsKICAJUl9ERVZfMihsYXlvdXQpID0gRkFMU0U7CiAgCWlmIChucm93
ID4gMiB8fCBuY29sID4gMikgewohIAkgICAgUl9ERVZfMihjZXhiYXNlKSA9IDAuNjY7CiAgCSAg
ICBSX0RFVl8yKG1leCkgPSAxLjA7CiAgCX0KICAJZWxzZSBpZiAobnJvdyA9PSAyICYmIG5jb2wg
PT0gMikgewohIAkgICAgUl9ERVZfMihjZXhiYXNlKSA9IDAuODM7CiAgCSAgICBSX0RFVl8yKG1l
eCkgPSAxLjA7CiAgCX0KICAJZWxzZSB7CiEgCSAgICBSX0RFVl9fKGNleGJhc2UpID0gMS4wOwog
IAkgICAgUl9ERVZfXyhtZXgpID0gMS4wOwogIAl9CiAgCVJfREVWX18obWZpbmQpID0gMTsKLS0t
IDQ1MSw0NjUgLS0tLQogIAlSX0RFVl8yKGRlZmF1bHRGaWd1cmUpID0gVFJVRTsKICAJUl9ERVZf
MihsYXlvdXQpID0gRkFMU0U7CiAgCWlmIChucm93ID4gMiB8fCBuY29sID4gMikgewohIAkgICAg
Ul9ERVZfMihjZXhiYXNlKSA9IDAuNjYqUl9ERVZfMihjZXhiYXNlKTsKICAJICAgIFJfREVWXzIo
bWV4KSA9IDEuMDsKICAJfQogIAllbHNlIGlmIChucm93ID09IDIgJiYgbmNvbCA9PSAyKSB7CiEg
CSAgICBSX0RFVl8yKGNleGJhc2UpID0gMC44MypSX0RFVl8yKGNleGJhc2UpOwogIAkgICAgUl9E
RVZfMihtZXgpID0gMS4wOwogIAl9CiAgCWVsc2UgewohIAkgICAgUl9ERVZfXyhjZXhiYXNlKSA9
IDEuMCpSX0RFVl8yKGNleGJhc2UpOwogIAkgICAgUl9ERVZfXyhtZXgpID0gMS4wOwogIAl9CiAg
CVJfREVWX18obWZpbmQpID0gMTsKKioqKioqKioqKioqKioqCioqKiAxMjg0LDEyOTggKioqKgog
ICAgICAvKi0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t
LS0tLSovCiAgCiAgICAgIGlmIChucm93ID4gMiB8fCBuY29sID4gMikgewohIAlncHB0cihkZCkt
PmNleGJhc2UgPSBkcHB0cihkZCktPmNleGJhc2UgPSAwLjY2OwogIAlncHB0cihkZCktPm1leCA9
IGRwcHRyKGRkKS0+bWV4ID0gMS4wOwogICAgICB9CiAgICAgIGVsc2UgaWYgKG5yb3cgPT0gMiAm
JiBuY29sID09IDIpIHsKISAJZ3BwdHIoZGQpLT5jZXhiYXNlID0gZHBwdHIoZGQpLT5jZXhiYXNl
ID0gMC44MzsKICAJZ3BwdHIoZGQpLT5tZXggPSBkcHB0cihkZCktPm1leCA9IDEuMDsKICAgICAg
fQogICAgICBlbHNlIHsKISAJZ3BwdHIoZGQpLT5jZXhiYXNlID0gZHBwdHIoZGQpLT5jZXhiYXNl
ID0gMS4wOwogIAlncHB0cihkZCktPm1leCA9IGRwcHRyKGRkKS0+bWV4ID0gMS4wOwogICAgICB9
CiAgCi0tLSAxMjg0LDEyOTggLS0tLQogICAgICAvKi0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t
LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLSovCiAgCiAgICAgIGlmIChucm93ID4gMiB8fCBu
Y29sID4gMikgewohIAlncHB0cihkZCktPmNleGJhc2UgPSBkcHB0cihkZCktPmNleGJhc2UgPSAw
LjY2KmRwcHRyKGRkKS0+Y2V4YmFzZTsKICAJZ3BwdHIoZGQpLT5tZXggPSBkcHB0cihkZCktPm1l
eCA9IDEuMDsKICAgICAgfQogICAgICBlbHNlIGlmIChucm93ID09IDIgJiYgbmNvbCA9PSAyKSB7
CiEgCWdwcHRyKGRkKS0+Y2V4YmFzZSA9IGRwcHRyKGRkKS0+Y2V4YmFzZSA9IDAuODMqZHBwdHIo
ZGQpLT5jZXhiYXNlOwogIAlncHB0cihkZCktPm1leCA9IGRwcHRyKGRkKS0+bWV4ID0gMS4wOwog
ICAgICB9CiAgICAgIGVsc2UgewohIAlncHB0cihkZCktPmNleGJhc2UgPSBkcHB0cihkZCktPmNl
eGJhc2UgPSAxLjAqZHBwdHIoZGQpLT5jZXhiYXNlOwogIAlncHB0cihkZCktPm1leCA9IGRwcHRy
KGRkKS0+bWV4ID0gMS4wOwogICAgICB9CiAgCg==
------=_Part_26951_7337931.1229163663746--