Hello! I'm trying to make a table of "Polymers" and get the following Data: "Name", "MolecularFormulaDisplay", "Resistivity" "DielectricConstant". I also plan to sort the table by DielectricConstant and filter Missing data.
I just started as a Research Assistant at school, so I'm pretty new here.
This is what I have so far, and I'm getting only Missing[NotAvailable]. I don't know whether the filter isn't working or DielectricConstant is inexistent for the class "Polymers".
Short[DeleteCases[
Table[ChemicalData[#,
prop], {prop, {"Name", "MolecularFormulaDisplay",
"Resistivity", "DielectricConstant"}}] & /@
ChemicalData["Polymers"], {_, _, _, _Missing}], 4]
vals = Table[
ChemicalData[#,
prop], {prop, {"Name", "MolecularFormulaDisplay", "Resistivity",
"DielectricConstant"}}] & /@ ChemicalData["Polymers"];
Text[Grid[
Prepend[vals[[1 ;; 10]], {"Name", "MolecularFormulaDisplay",
"Resistivity", "DielectricConstant"}], Frame -> All,
Background -> {None, {{{LightBlue, White}}, {1 -> LightYellow}}},
Alignment -> Left]]