Message Boards Message Boards

GROUPS:

Getting ChemicalData to work?

Posted 2 years ago
3409 Views
|
2 Replies
|
0 Total Likes
|

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]]
2 Replies

Sadly our coverage for these properties is minimal,

In[110]:= Length@DeleteMissing@ChemicalData[All, "DielectricConstant"]
          Length@DeleteMissing@ChemicalData[All, "Resistivity"]

Out[110]= 133

Out[111]= 71

It's okay. Thank you Jason.

Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Reply Preview
Attachments
Remove
or Discard

Group Abstract Group Abstract