知識を広げる 精選データを使う 分子量、地理、標高、気温、栄養価、沸点、リスト、昇順、Sort、金融、株価、国旗、遺伝子配列、染色体
ハンズ・オン・スタートMathematica® -Wolfram言語™によるプログラミング (C・ヘイスティング(著)、K・ミショー(著)、M・モリソン(著)、ウルフラム・リサーチ(翻訳)、丸善出版)の第2部(知識を広げる)、第21章(精選データを使う)の練習問題1、2、3、4、5、6、7、8、9、10の解答を求めてみる。
molecular weight of hydrochloric acid and nitric acid
Entity["Chemical", "AquaRegia"][EntityProperty["Chemical", "RelativeMolecularMass"]]
99.47
us highest elevation - Canada highest elevation
Entity["Country", "UnitedStates"][EntityProperty["Country", "HighestElevation"]] - Entity["Country", "Canada"][EntityProperty["Country", "HighestElevation"]]
temperature Chicago 1989/2/25 9:00
AirTemperatureData[Entity["City", {"Chicago", "Illinois", "UnitedStates"}], DateObject[{1989, 2, 25, 9, 0}]]
nutritional value of chicken sandwich and soda
Entity["Chemical", "Benzene"][EntityProperty["Chemical", "BoilingPoint"]]
bp = Table[
Entity["Chemical", chemical][EntityProperty["Chemical", "BoilingPoint"]],
{chemical, {"Benzene", "Ethanol", "Chloroform", "Diethylamine", "Pentane"}}
];
Sort[bp]
DateListPlot[
FinancialData["MSFT", {2000, 1, 1}],
Joined -> True,
Filling -> Bottom
]
DateListPlot[
FinancialData["MSFT", {2000, 1, 1}],
Joined -> False,
Filling -> Bottom
]
Manipulate[
DateListPlot[
FinancialData[ticker, {2000, 1, 1}],
Joined -> True,
Filling -> Bottom,
PlotRange -> {0, 80}
],
{ticker, {"LUV", "DAL", "UAL", "AAL"}}
]
CountryData["Japan", "Flag"]
Short[CountryData["Asia"]]
Manipulate[
coutrydata["Flag"],
{countrydata, CountryData["Asia"]}
]
CountryData["Asia"][[1]]["Flag"]
CountryData["Asia"][[RandomInteger[{1, Length[CountryData["Asia"]]}]]]["Flag"]
Column[CountryData["Asia", "Flag"]]
GenomeLookup["GGGTATAGGGTATAGAT"]
{{{Chromosome7, -1}, {17796562, 17796578}}}