Rプログラミングの小ネタ

ループを使って複数のグラフを描くような状況。 par ( mfrow= c ( 2 , 2 ) ) # 2行2列で作図する   for ( i in 1 : 4 ) { curve ( x^i , - 1 , 1 , asp= 1 , ylab= "y" ) } 複数のグラフを描いてみた（タイトルなし） グラフを区別するためにmainオプションでタイトルを付けましょう↓ par ( mfrow= c ( 2 , 2 ) )   for ( i in 1 : 4 ) { curve ( x^i , - 1 , 1 , asp= 1 , ylab= "y" , main= paste ( "y=x^" , i ) ) } タイトルをつけてみたが格好悪い う～ん、伝わりはするけど、"y=x^2"みたいな見た目が格好悪い。ちゃんと数式（数字の肩に指数が乗っている感じ）で表現したいですよね。 そういうときは、expression関数で、いけるかな・・・？ par ( mfrow= c ( 2 , 2 ) )   for ( i in 1 : 4 ) { curve ( x^i , - 1 , 1 , asp= 1 , ylab= "y" , main= expression ( y==x^i ) ) } expressionだと変数iが展開されない ありゃ？ 数式の形にはなりましたが、変数iが展開されずそのまま「i」と出ちゃいました。 やっと本題です。 このiを展開（i = 1, 2, 3, 4）したいときには、bquote関数が使えます↓ par ( mfrow= c ( 2 , 2 ) )   for ( i in 1 : 4 ) { curve ( x^i , - 1 , 1 , asp= 1 , ylab= "y" , main= bquote ( y==x^. ( i ) ) ) } ...