48024_ja-JP

liliconcom

ネストされたループを使用して行列を埋める方法

ファイル（テキストと数値の両方を含む）から特定の数値データのセットを抽出し、JMPで分析しやすい別のテーブルに入れようとしています。特定の基準を満たすデータが存在する可能性のある任意の数の列または行に対してスクリプトを機能させたいと考えています。私が思いついたのは以下のとおりです。

Rowlist = [];
For( i = 1, i <= N Rows( Dtraw ), i++,
 If( i == 1,
  If( Num( Column( Dtraw, 2 )[i] ) > 0 & Num( Column( Dtraw, 2 )[i] ) < 1000,
   Rowlist = Matrix( i )
  ),
  If( Num( Column( Dtraw, 2 )[i] ) > 0 & Num( Column( Dtraw, 2 )[i] ) < 1000,
   Rowlist = V Concat( Rowlist, Matrix( i ) )
  )
 )
);
show(Rowlist);

cols= dtraw<<GET column="" names=""></GET>

Rowlist は、必要な基準 (つまり、テキストではなく数値) を満たす行のマトリックスです。このリストと「<

 

 

-ありがとう

Re: ネストされたループを使用して Matrix を埋める方法

ありがとう、これは完全に機能します！

Re: ネストされたループを使用して Matrix を埋める方法

入力ミスがいくつかあります。

1. 2 番目の For ループ

For( k = 2, k <= N Items( cols ), i++,
</CODE></PRE>
<P>「k」ではなく「i」をインクリメントしています。そのはず</P>
<PRE><CODE class=" language-jsl">For( k = 2, k <= N Items( cols ), k++,

次に、MainData マトリックスを参照するときに k から 1 を引く必要があります。そうしないと、列数より 1 少ないため、範囲を超えてしまいます。

MainData[i, k - 1] = Num( Column( dtraw, k - 1 )[rowlist[i]] )

セクション全体は次のようになります。

For( i = 1, i <= N Rows( rowlist ), i++,
 For( k = 2, k <= N Items( cols ), k++,
  MainData[i, k - 1] = Num( Column( dtraw, k - 1 )[rowlist[i]] )
 )
);

Re: ネストされたループを使用して Matrix を埋める方法

以下は、データの一般的な例です (形式を示しています)。

日付時刻：	2017/11/29 20:11
タイトル	文章
タイトル	文章
タイトル	文章
タイトル	文章
タイトル	文章
タイトル	文章
タイトル	文章
タイトル	タイトル	タイトル	タイトル	タイトル	タイトル	タイトル	タイトル	タイトル	タイトル	タイトル	タイトル
	1	1	1	1	1	1	1	1	1	1	1
	2	2	2	2	2	2	2	2	2	2	2
	3	3	3	3	3	3	3	3	3	3	3
	4	4	4	4	4	4	4	4	4	4	4
	5	5	5	5	5	5	5	5	5	5	5
	6	6	6	6	6	6	6	6	6	6	6
	7	7	7	7	7	7	7	7	7	7	7
	8	8	8	8	8	8	8	8	8	8	8
	9	9	9	9	9	9	9	9	9	9	9
	10	10	10	10	10	10	10	10	10	10	10
	11	11	11	11	11	11	11	11	11	11	11
	12	12	12	12	12	12	12	12	12	12	12
	13	13	13	13	13	13	13	13	13	13	13
	14	14	14	14	14	14	14	14	14	14	14
	15	15	15	15	15	15	15	15	15	15	15
	16	16	16	16	16	16	16	16	16	16	16
	17	17	17	17	17	17	17	17	17	17	17
	18	18	18	18	18	18	18	18	18	18	18
	19	19	19	19	19	19	19	19	19	19	19
	20	20	20	20	20	20	20	20	20	20	20
	21	21	21	21	21	21	21	21	21	21	21
	22	22	22	22	22	22	22	22	22	22	22
	23	23	23	23	23	23	23	23	23	23	23
	24	24	24	24	24	24	24	24	24	24	24
	25	25	25	25	25	25	25	25	25	25	25
	26	26	26	26	26	26	26	26	26	26	26
	27	27	27	27	27	27	27	27	27	27	27
	28	28	28	28	28	28	28	28	28	28	28
	29	29	29	29	29	29	29	29	29	29	29
	30	30	30	30	30	30	30	30	30	30	30
	31	31	31	31	31	31	31	31	31	31	31
	32	32	32	32	32	32	32	32	32	32	32
	33	33	33	33	33	33	33	33	33	33	33
	34	34	34	34	34	34	34	34	34	34	34
	35	35	35	35	35	35	35	35	35	35	35
	36	36	36	36	36	36	36	36	36	36	36
	37	37	37	37	37	37	37	37	37	37	37
	38	38	38	38	38	38	38	38	38	38	38
	39	39	39	39	39	39	39	39	39	39	39
	40	40	40	40	40	40	40	40	40	40	40
	41	41	41	41	41	41	41	41	41	41	41
	42	42	42	42	42	42	42	42	42	42	42
	43	43	43	43	43	43	43	43	43	43	43
	44	44	44	44	44	44	44	44	44	44	44
	45	45	45	45	45	45	45	45	45	45	45
	46	46	46	46	46	46	46	46	46	46	46
	47	47	47	47	47	47	47	47	47	47	47
	48	48	48	48	48	48	48	48	48	48	48
	49	49	49	49	49	49	49	49	49	49	49
	50	50	50	50	50	50	50	50	50	50	50
	51	51	51	51	51	51	51	51	51	51	51
	52	52	52	52	52	52	52	52	52	52	52
	53	53	53	53	53	53	53	53	53	53	53
	54	54	54	54	54	54	54	54	54	54	54
	55	55	55	55	55	55	55	55	55	55	55
	56	56	56	56	56	56	56	56	56	56	56
	57	57	57	57	57	57	57	57	57	57	57
	58	58	58	58	58	58	58	58	58	58	58
	59	59	59	59	59	59	59	59	59	59	59
	60	60	60	60	60	60	60	60	60	60	60
	61	61	61	61	61	61	61	61	61	61	61
	62	62	62	62	62	62	62	62	62	62	62
	63	63	63	63	63	63	63	63	63	63	63
	64	64	64	64	64	64	64	64	64	64	64
	65	65	65	65	65	65	65	65	65	65	65
	66	66	66	66	66	66	66	66	66	66	66
	67	67	67	67	67	67	67	67	67	67	67
	68	68	68	68	68	68	68	68	68	68	68
	69	69	69	69	69	69	69	69	69	69	69
	70	70	70	70	70	70	70	70	70	70	70
	71	71	71	71	71	71	71	71	71	71	71
	72	72	72	72	72	72	72	72	72	72	72
	73	73	73	73	73	73	73	73	73	73	73
値ラベル		74	74	74	74	74	74	74	74
値ラベル		75	75	75	75	75	75	75	75
値ラベル		76	76	76	76	76	76	76	76
値ラベル		77	77	77	77	77	77	77	77
値ラベル		78	78	78	78	78	78	78	78
値ラベル		79	79	79	79	79	79	79	79
値ラベル		80	80	80	80	80	80	80	80
値ラベル		81	81	81	81	81	81	81	81
日付時刻：	2017/11/29 20:11
タイトル	文章
タイトル	文章
タイトル	文章
タイトル	文章
タイトル	文章
タイトル	文章
タイトル	文章
タイトル	タイトル	タイトル	タイトル	タイトル	タイトル	タイトル	タイトル	タイトル	タイトル	タイトル	タイトル
	1	1	1	1	1	1	1	1	1	1	1
	2	2	2	2	2	2	2	2	2	2	2
	3	3	3	3	3	3	3	3	3	3	3
	4	4	4	4	4	4	4	4	4	4	4
	5	5	5	5	5	5	5	5	5	5	5
	6	6	6	6	6	6	6	6	6	6	6
	7	7	7	7	7	7	7	7	7	7	7
	8	8	8	8	8	8	8	8	8	8	8
	9	9	9	9	9	9	9	9	9	9	9
	10	10	10	10	10	10	10	10	10	10	10
	11	11	11	11	11	11	11	11	11	11	11
	12	12	12	12	12	12	12	12	12	12	12
	13	13	13	13	13	13	13	13	13	13	13
	14	14	14	14	14	14	14	14	14	14	14
	15	15	15	15	15	15	15	15	15	15	15
	16	16	16	16	16	16	16	16	16	16	16
	17	17	17	17	17	17	17	17	17	17	17
	18	18	18	18	18	18	18	18	18	18	18
	19	19	19	19	19	19	19	19	19	19	19
	20	20	20	20	20	20	20	20	20	20	20
	21	21	21	21	21	21	21	21	21	21	21
	22	22	22	22	22	22	22	22	22	22	22
	23	23	23	23	23	23	23	23	23	23	23
	24	24	24	24	24	24	24	24	24	24	24
	25	25	25	25	25	25	25	25	25	25	25
	26	26	26	26	26	26	26	26	26	26	26
	27	27	27	27	27	27	27	27	27	27	27
	28	28	28	28	28	28	28	28	28	28	28
	29	29	29	29	29	29	29	29	29	29	29
	30	30	30	30	30	30	30	30	30	30	30
	31	31	31	31	31	31	31	31	31	31	31
	32	32	32	32	32	32	32	32	32	32	32
	33	33	33	33	33	33	33	33	33	33	33
	34	34	34	34	34	34	34	34	34	34	34
	35	35	35	35	35	35	35	35	35	35	35
	36	36	36	36	36	36	36	36	36	36	36
	37	37	37	37	37	37	37	37	37	37	37
	38	38	38	38	38	38	38	38	38	38	38
	39	39	39	39	39	39	39	39	39	39	39
	40	40	40	40	40	40	40	40	40	40	40
	41	41	41	41	41	41	41	41	41	41	41
	42	42	42	42	42	42	42	42	42	42	42
	43	43	43	43	43	43	43	43	43	43	43
	44	44	44	44	44	44	44	44	44	44	44
	45	45	45	45	45	45	45	45	45	45	45
	46	46	46	46	46	46	46	46	46	46	46
	47	47	47	47	47	47	47	47	47	47	47
	48	48	48	48	48	48	48	48	48	48	48
	49	49	49	49	49	49	49	49	49	49	49
	50	50	50	50	50	50	50	50	50	50	50
	51	51	51	51	51	51	51	51	51	51	51
	52	52	52	52	52	52	52	52	52	52	52
	53	53	53	53	53	53	53	53	53	53	53
	54	54	54	54	54	54	54	54	54	54	54
	55	55	55	55	55	55	55	55	55	55	55
	56	56	56	56	56	56	56	56	56	56	56
	57	57	57	57	57	57	57	57	57	57	57
	58	58	58	58	58	58	58	58	58	58	58
	59	59	59	59	59	59	59	59	59	59	59
	60	60	60	60	60	60	60	60	60	60	60
	61	61	61	61	61	61	61	61	61	61	61
	62	62	62	62	62	62	62	62	62	62	62
	63	63	63	63	63	63	63	63	63	63	63
	64	64	64	64	64	64	64	64	64	64	64
	65	65	65	65	65	65	65	65	65	65	65
	66	66	66	66	66	66	66	66	66	66	66
	67	67	67	67	67	67	67	67	67	67	67
	68	68	68	68	68	68	68	68	68	68	68
	69	69	69	69	69	69	69	69	69	69	69
	70	70	70	70	70	70	70	70	70	70	70
	71	71	71	71	71	71	71	71	71	71	71
	72	72	72	72	72	72	72	72	72	72	72
	73	73	73	73	73	73	73	73	73	73	73
値ラベル		74	74	74	74	74	74	74	74
値ラベル		75	75	75	75	75	75	75	75
値ラベル		76	76	76	76	76	76	76	76
値ラベル		77	77	77	77	77	77	77	77
値ラベル		78	78	78	78	78	78	78	78
値ラベル		79	79	79	79	79	79	79	79
値ラベル		80	80	80	80	80	80	80	80
値ラベル		81	81	81	81	81	81	81	81

 

 

Re: ネストされたループを使用して Matrix を埋める方法

以下のエラーメッセージが表示されます。

 

'Subscript' 、rowlist[/*###*/i] のアクセスまたは評価における無効な添字 (数値または数値のリストである必要があります){1271}

　

次のスクリプトでは、/*####*/ でマークされたエラー

 

Show( 行リスト );

cols = dtraw << get column names();

MainData = J( N 項目 ( 行リスト ), N 項目 ( 列 ) - 1 );

For( i = 1, i <= N Items( 行リスト ), i++,

For( k = 2, k <= N Items( cols ), i++,

MainData[i, k] = Num( Column( dtraw, k )[行リスト[/*###*/i]] )

)

);

Re: ネストされたループを使用して Matrix を埋める方法

もちろん、コードは「ほぼ正しい」ように見えます。

実際にどのようなエラーが表示されますか? 「dtraw」の一部をアップロードできますか?