72491_zh-TW

liliconcom

如何將剪貼簿中混合有文字的資料表貼到指定的表中？

剪貼簿複製了決策樹報告中的R方表，6行6列，包含文字。 如何將此表貼到新表中？
謝謝你！

 

 

 

 

R 方 RMSE N 分割數 AICc
訓練 0.502 2.5656293 3625 20 17162.6
驗證 -0.77 4.6256646 3625
測試 -0.70 4.3112172 3635

 

 

 

Re: 如何將剪貼簿中混合有文字的資料表貼到指定的表中？吉姆，謝謝您一直以來的關注。 抱歉，這個問題我沒做過，已經解決了。 這張圖是我用gzmorgan0提供的方法得到的實際效果。


在這個過程中，我將多個資料表組合起來，然後將R方的資料寫入固定的空白儲存格中，這樣在後期的VBA處理中就可以準確找到。
再次感謝兩位專家！Re: 如何將剪貼簿中混合有文字的資料表貼到指定的表中？

我不太確定你想問什麼。我的想法是，你有兩條線試圖達到相同的目的。第一行使用 JMP 連線平台將資料表新增至現有資料表。 第二行是否嘗試替換 dt3 資料表中的值？

Re: 如何將剪貼簿中混合有文字的資料表貼到指定的表中？

Re: 如何將剪貼簿中混合有文字的資料表貼到指定的表中？

感謝 gzmorgan0！ 我從這個例子中學到了很多。

 

 

在文法上，JSL的行列要求與VBA一致。

但是VBA的… Cells(2, "").Resize(UBound(br), 1) = br …更有彈性。

 

 

Re: 如何將剪貼簿中混合有文字的資料表貼到指定的表中？
我的程式碼中有一個表合併，此時我想寫 R 平方。但這不是主要的事情。


d3 = d1 << Join( With( d2 ), 依行號, 輸出表( "連接資料" ) );




我已經習慣了VBA，所以我還沒有調整我的想法。謝謝Jim！

Re: 如何將剪貼簿中混合有文字的資料表貼到指定的表中？

您始終可以從您引用的 R Square 表建立 JMP 資料表，然後將該表另存為 csv、txt 或 slsx 檔案。然後讀入您的 VBA 腳本。

Re: 如何將剪貼簿中混合有文字的資料表貼到指定的表中？我根據不同的分割次數、最小分割數、不同的驗證列和不同的Y因子循環每個文件，每個文件產生200個結果。


這些結果保存為excel文件，並以VBA進一步計算，得到符合要求的結果。

用VBA處理結果，熟練了，也比較靈活，但決策樹操作只能用JMP：JMP快。

由於我的決策樹JSL程式碼中沒有r方控制，所以我還想取得決策樹報告中的相關r方資料。
我在想如果我不能貼上r方表，我只需要3個。

謝謝你！Re: 如何將剪貼簿中混合有文字的資料表貼到指定的表中？感謝每一位專家的協助！
我的JSL基礎實在太差了。 由於最近剛試用了1個月的JMP專業版，急著用JSL做多文件決策樹計算，而且這個過程是自動的，所以無法自己慢慢學習，只能諮詢專家。Re: 如何將剪貼簿中混合有文字的資料表貼到指定的表中？

在 JMP 應用程式中，複製和貼上資料表通常不是用於行動資料表內容的方法。

請您解釋一下您正在嘗試將剪貼簿貼到哪個應用程式等。

Re: 如何將剪貼簿中混合有文字的資料表貼到指定的表中？

您需要開始閱讀一些基本知識。 每種計算機語言都有自己的語法。

 

Names Default to Here(1);

dt = Open("$sample_data/Boston Housing.JMP");

dt << Make Validation Column(
 Training Set( 0.50 ),
 Validation Set( 0.25 ),
 Test Set( 0.25 ),
 Formula Random
);

cart = dt<< Partition(
 Y( :mvalue ),
 X(
  :crim,
  :zn,
  :indus,
  :chas,
  :nox,
  :rooms,
  :age,
  :distance,
  :radial,
  :tax,
  :pt,
  :b,
  :lstat
 ),
 Validation( :Validation ),
 Show Tree( 0 ),
 Split History( 1 ),
 Informative Missing( 1 ),
 Initial Splits(
  :lstat >= 7.79,
  {:distance < 2.0788, {:nox >= 0.609, {:lstat >= 17.21, {:crim >= 10.8342, {},
  {:nox < 0.74}}}}, {:lstat >= 14.8, {:crim >= 0.75026, {:b < 375.87}, {:tax
   >= 304}}, {:rooms < 6.726, {:rooms < 6.101, {}, {:tax >= 422, {}, {:lstat
   >= 11.98, {}, {:crim < 0.11425, {:rooms < 6.405}}}}}}}},
  {:lstat >= 4.32, {:rooms < 6.8, {:rooms < 6.546, {:distance >= 4.4986,
  {:indus < 5.64, {}, {:lstat >= 6.15}}}}, {:rooms < 7.52}}, {:b >= 392.83,
  {:rooms < 7.61}, {:indus < 18.1}}}
 ),
 SendToReport(
  Dispatch( {}, "Partition Report", FrameBox, {Frame Size( 480, 218 )} )
 )
);

rsq_dt = report(Cart)[TableBox(1)] << Make into Data Table;

//create a table with extra rows and extra columns
_xx=New Table("result", New Column("d1"), New Column("d2"), New Column("d3"), New Column("d4"),
      New Column("Type", Character), New Column("RSQ"),
   new Column("RMSE"), New Column("N"), New Column ("nsplits"),
   new column("AICc"),
   add rows(100)
);

nr = nrow(rsq_dt);
nc = ncol(rsq_dt);
cb=5;  ce=cb + nc -1;  //Column 5 is wher I want to paste it
rb=50; re=rb + nr -1;
//if rb> nrow(_xx) or ce>ncol(_xx) or the column data types do not match the next line will throw an error.<BR />//it is up to the scripter to do error checking 

_xx[rb::re, cb::ce] = rsq_dt[1::nr, 1::nc];

close(rsq_dt, NoSave);

current data table(_xx);
_xx << bring window to front;
_xx << go to row(rb);
_xx << next selected; 

Re: 如何將剪貼簿中混合有文字的資料表貼到指定的表中？完成此描述：
我已使用 Jim 提供的 JSL 將決策樹的 R 端報告複製到剪貼簿。

名稱預設為此處( 1 );
dt = Open( "$SAMPLE_DATA\Boston Housing.jmp" );
pp = dt << 分區(
Y（：m值），
X（
：犯罪，
：鋅，
：梧桐，
：查斯，
：諾克斯，
：房間，
：年齡，
：距離，
：徑向，
：稅，
：點，
：b，
:lstat
),
分裂最佳( 3 )
）；

Report( pp )[表格框( 1 )] << 複製資料；



我嘗試了很多方法將剪貼簿的內容貼到指定的表中但沒有成功。

文字=取得剪貼簿();
dt[7496,11]=取得剪貼簿();


請各位指教。謝謝！
Re: 如何將剪貼簿中混合有文字的資料表貼到指定的表中？

您複製的表格的第一列包含群組名稱「訓練」、「驗證」、「測試」、文字。您正在嘗試將其貼到數字列而不是字串中。 請注意，點符號代表空白數字列。

 

JMP 維護整個資料列的資料類型。JMP 表就像資料庫表一樣，您不會發現某個人的姓名位於預期為電話號碼的列的某行中。Excel、Statistica、舊RS/1 是顯示表。 它們允許在單元格 A1 中顯示美國憲法的序言，在單元格 A2 中顯示今天的溫度。

 

請注意，如果您想要建立一個由許多“類似”表組成的表，例如許多分割區，請選擇“建立組合資料表”，它將建立一個包含所有分割區的“擬合匯總表”的表。  

Re: 如何將剪貼簿中混合有文字的資料表貼到指定的表中？需要用JSL來完成，謝謝！Re: 如何將剪貼簿中混合有文字的資料表貼到指定的表中？