Mathematica 13 เราเลือกได้ว่าจะติดตั้งแต่โปรแกมอย่างเดียวไม่เอาเอกสาร help หรือเอาทั้งโปรแกรมหรือเอกสาร help ได้ ดีมากเลย ประหยัดเนื้อที่ไปได้เยอะเลย ลงทั้งหมด 19 GB แต่ถ้าลงเฉพาะโปรแกรมเหลือ 6GB
Mathematica 13 เราเลือกได้
Tag: Mathematica
Zero width joiner
https://en.m.wikipedia.org/wiki/Zero-width_joiner
แก้โจทย์เลขสนุกๆ
ข้อนี้เราสามารถเขียนcode ง่ายๆในภาษาWolfram ได้ครับ ไอเดียก็เอาเลขหน้ามาเรียงกันแล้วหาว่ามีเลขโดดกี่ตัว การเรียงเลขเราก็เพียงใช้คำสั่ง Range ตั้งแต่หน้า 1 ถึง หน้าที่ต้องการแล้วก็นับว่ามีเลชโดดกี่ตัวด้วยการประยุกต์ใช้คำสั่ง IntegerDigits
รับหลายค่าFormPage
เราสามารถประยุกต์ใช้คำสั่ง DelimitedSequence มาใช้ได้ครับ เช่น
โดยที่ชนิดของตัวแปรใน DelimitedSequence ก็สามารถกำหนดได้เช่นเดียวกันกับ FormPage/FormFunction เลย
เปลี่ยนข้อความเมื่อเลื่อนเม้าส์ไปโดน
ตัวอย่าง code ง่ายๆในภาษา Wolfram เผื่อเป็นประโยชน์ครับ
OverviewMouseover[header_, subs_] :=
CellPrint@
Cell[BoxData[
ToBoxes@Mouseover[
Framed[Style[header, "OverviewSection"],
FrameMargins -> {{15, 15}, {5, 5}}, FrameStyle -> None,
RoundingRadius -> 5],
Evaluate@
If[subs == "",
Framed[Style[header, "OverviewSection", White],
FrameMargins -> {{15, 15}, {5, 5}}, FrameStyle -> None,
RoundingRadius -> 5, Background -> m8red[1]],
Row[{Framed[Style[header, "OverviewSection", White],
FrameMargins -> {{15, 15}, {5, 5}}, FrameStyle -> None,
RoundingRadius -> 5, Background -> m8red[1]], " » ",
Framed[Style[subs, "OverviewSection"],
FrameMargins -> {{15, 15}, {5, 5}}, FrameStyle -> m8red[1],
RoundingRadius -> 5, Background -> White]}]]]],
"OverviewSection"]