「統計学関連なんでもあり」の過去ログ--- 041

No.05564　画像設定　　【R初心者】　2008/01/28(Mon) 12:41

Rで，グラフ作成をしています。横長のグラフをつくりたいのですが，うまくいきません。

png('test.bmp', width = 450, height = 300)
dev.off()

としても，縦横同じの比率のtest.bmpが作られるだけです。

No.05565　Re: 画像設定　　【R初心者】　2008/01/28(Mon) 12:55

png('len_width.png', width = 450, height = 300)
でうまくいきました。

No.05566　Re: 画像設定　　【R初心者】　2008/01/28(Mon) 13:05

graf.sds5<-function(a,b)
{
	png('len_width.png', width = 450, height = 300)
	dev.off()
	n <- nrow(a)
	x <- a[1]
	y <- a[2]
	uy <- a[3]
	ly <- a[4]
	z <- a[5]
	uz <- a[6]
	lz <- a[7]
 #######################
	x <- x[[1]]
	y <- y[[1]]
	uy <- uy[[1]]
	ly <- ly[[1]]
	z <- z[[1]]
	uz <- uz[[1]]
	lz <- lz[[1]]
	min<-min(ly,lz)
	max<-max(uy,uz)
	minx<-min(x-b)
	maxx<-max(x+b)
	Pex<-c(1.7)
########################
	windows()
	png('len_width.png')
	plot(x-b,y,xlim=range(minx,maxx),ylim=range(min,max),col=1,pch=19,cex=Pex)
	dev.off()
}

で，plot命令後には，480_480の画像になります。
width = 450, height = 300の画像にできないでしょうか？

No.05567　Re: 画像設定　　【青木繁伸】　2008/01/28(Mon) 14:12

なんか，質問自体が混乱しているようなのですが。

No. 5566 のように特定のプログラムを上げていただいても，その関数をどのような引数で呼び出すかについての情報がなければ，追試することもできません。
今の場合は，「指定したサイズの png ファイルができません」ということですから，たとえば以下のような簡単なプログラムを示せばよいことです。
png("test.png", width=450, height=300)
hist(rnorm(1000))
dev.off()
このプログラムが動くかどうかという質問でよいと思います。あなたの環境でこのプログラムによって作成されるpngファイルのサイズはいくつになるのでしょうか？

示されたプログラムでは，最初の方でサイズを指定したpng関数が呼ばれ，何も描画しないまま即座にdev.offされてしまいますね。最後の方で呼ばれる png関数は引数を何も持っていないので，デフォルトの大きさのグラフが描かれますよ。作成される画像ファイルは後半の方なので，指定した大きさではなくなっているのでは？

No.05568　Re: 画像設定　　【R初心者】　2008/01/28(Mon) 14:53

http://www.okada.jp.org/RWiki/?cmd=read&page=Tips%2F%A5%A8%A5%E9%A1%BC%A5%D0%A1%BC%A1%A6%BF%AE%CD%EA%B6%E8%B4%D6&word=%BF%AE%CD%EA%B6%E8%B4%D6
の信頼区間のグラフの作成です。
先生の言われるように，後のに条件をつけてうまくいきました。
エクセルデータをaによませて行うグラフ作成でした。
ありがとうございました。