つづき

　　置換（Permutation）の計算山中和義 2007/10/30 11:38:21 (修正1回) 　　└つづき山中和義 2007/10/30 11:39:25 (修正1回) 　　　├サンプル（あみだくじ、カードのシャッフル... 山中和義 2007/10/30 11:42:06 (修正2回) 　　　│└!置換行列山中和義 2007/10/31 19:32:35 　　　├!１５パズルをつくる山中和義 2007/10/30 21:46:16 (修正3回) 　　　└!ルービックキューブ（Rubik'scube、magicc... 山中和義 2007/11/01 21:07:01 (修正1回) 　　　　└つづき山中和義 2007/11/01 21:10:06 (修正1回)

つづき

!「正面を右回転」の巡回置換を定義する。
100 DATA 1,3,8,6 !その面　※５つの巡回置換は互いに素のためどの順でもよい
DATA 2,5,7,4
DATA 17,35,32,46 !まわりの面
DATA 18,37,31,44
DATA 19,40,30,41

!「裏面を右回転」の場合
200 DATA 9,11,16,14, 10,13,15,12 !その面
DATA 22,48,27,33, 23,45,26,36, 24,43,25,38 !まわりの面

!「上面を右回転」の場合
300 DATA 17,19,24,22, 18,21,23,20 !その面
DATA 6,46,14,38, 7,47,15,39, 8,48,16,40 !まわりの面

!「下面を右回転」の場合
400 DATA 25,27,32,30, 26,29,31,28 !その面
DATA 1,33,9,41, 2,34,10,42, 3,35,11,43 !まわりの面

!「左側面を右回転」の場合
500 DATA 33,35,40,38, 34,37,39,36 !その面
DATA 1,17,16,25, 4,20,13,28, 6,22,11,30 !まわりの面

!「右側面を右回転」の場合
600 DATA 41,43,48,46, 42,45,47,44 !その面
DATA 3,27,14,19, 5,29,12,21, 8,32,9,24 !まわりの面

END

Re: !ルービックキューブ（Rubik'scube、magicc...	返事を書くノートメニュー
山中和義 <drdlxujciw> 2007/11/01 21:10:06 ** この記事は1回修正されてます
つづき !「正面を右回転」の巡回置換を定義する。 100 DATA 1,3,8,6 !その面　※５つの巡回置換は互いに素のためどの順でもよい DATA 2,5,7,4 DATA 17,35,32,46 !まわりの面 DATA 18,37,31,44 DATA 19,40,30,41 !「裏面を右回転」の場合 200 DATA 9,11,16,14, 10,13,15,12 !その面 DATA 22,48,27,33, 23,45,26,36, 24,43,25,38 !まわりの面 !「上面を右回転」の場合 300 DATA 17,19,24,22, 18,21,23,20 !その面 DATA 6,46,14,38, 7,47,15,39, 8,48,16,40 !まわりの面 !「下面を右回転」の場合 400 DATA 25,27,32,30, 26,29,31,28 !その面 DATA 1,33,9,41, 2,34,10,42, 3,35,11,43 !まわりの面 !「左側面を右回転」の場合 500 DATA 33,35,40,38, 34,37,39,36 !その面 DATA 1,17,16,25, 4,20,13,28, 6,22,11,30 !まわりの面 !「右側面を右回転」の場合 600 DATA 41,43,48,46, 42,45,47,44 !その面 DATA 3,27,14,19, 5,29,12,21, 8,32,9,24 !まわりの面 END