あるベクトルの要素の並べ替えに応じて,複数のベクトルの対応する要素も並べ替える     Last modified: Apr 07, 2004

具体例:
	  x : (3, 2, 5, 1, 4)
	  y : (1, 3, 4, 5, 2)
	というベクトルがあったとき,
	  x : (1, 2, 3, 4, 5)
	のように,片方の要素を小さい順に並べ替えたとき,
	x に対応する y の要素も並べ替える。すなわち,
	  y : (5, 3, 1, 2, 4)
	としたい(並べ替えの前後で,x[i] と y[i] の対応が崩れない)。

プログラム例:
	x <- c(3, 2, 5, 1, 4)
	y <- c(1, 3, 4, 5, 2)
	o <- order(x)
	nx <- x[o]
	ny <- y[o]
	rbind(nx, ny)
	
実行結果:
	   [,1] [,2] [,3] [,4] [,5]
	nx    1    2    3    4    5
	ny    5    3    1    2    4

注:
	sort(x) と x[order(x)] は,同じ結果となることを利用する。


・ 直前のページへ戻る  ・ E-mail to Shigenobu AOKI

Made with Macintosh