Forgot password?
 Register account
View 259|Reply 2

批量生成变量赋予随机值

[Copy link]

459

Threads

952

Posts

9843

Credits

Credits
9843

Show all posts

青青子衿 Posted 2023-4-21 06:06 |Read mode
  1. Clear["`*"]
  2. lst1 = Flatten[
  3.    Table[Symbol[Evaluate["a" <> ToString[i] <> ToString[j]]], {i, 0,
  4.      3}, {j, 1, 3}]];
  5. lst2 = Flatten[RandomReal[{-2, 2}, {4, 3}]];
  6. data1 = {lst1, lst2}
  7. MapThread[(Clear[#1]; #1 = #2) &, data1]
Copy the Code

3153

Threads

7906

Posts

610K

Credits

Credits
64096
QQ

Show all posts

hbghlyj Posted 2023-4-23 05:02
请问上面的
Flatten[RandomReal[{-2, 2}, {4, 3}]]
是否可以写成
RandomReal[{-2, 2}, 12]

3153

Threads

7906

Posts

610K

Credits

Credits
64096
QQ

Show all posts

hbghlyj Posted 2023-4-27 21:46
请问Clear["`*"]Clear["Global`*"]是否等效

Mobile version|Discuz Math Forum

2025-6-5 01:56 GMT+8

Powered by Discuz!

× Quick Reply To Top Edit