From 09fbf31ef6f352e76abac2a7e76838ef331edeb9 Mon Sep 17 00:00:00 2001
From: Ranke Johannes
oct <- chent$new("1-octanol", smiles = "CCCCCCCCO", pubchem = FALSE)
-#> Trying to get chemical information from RDKit using user SMILES
-#> CCCCCCCCO
-print(oct)
-#> <chent>
-#> Identifier $identifier 1-octanol
-#> InChI Key $inchikey NA
-#> SMILES string $smiles:
-#> user
-#> "CCCCCCCCO"
-#> Molecular weight $mw: 130.2
-if (!is.null(oct$Picture)) {
- plot(oct)
-}
-
-caffeine <- chent$new("caffeine")
+ caffeine <- chent$new("caffeine")
#> PubChem:
#> Trying to get chemical information from RDKit using PubChem_Canonical SMILES
#> CN1C=NC2=C1C(=O)N(C(=O)N2C)C
@@ -850,6 +835,17 @@ Write a PNG image of the structure
plot(caffeine)
}
+oct <- chent$new("1-octanol", smiles = "CCCCCCCCO", pubchem = FALSE)
+#> Trying to get chemical information from RDKit using user SMILES
+#> CCCCCCCCO
+print(oct)
+#> <chent>
+#> Identifier $identifier 1-octanol
+#> InChI Key $inchikey NA
+#> SMILES string $smiles:
+#> user
+#> "CCCCCCCCO"
+#> Molecular weight $mw: 130.2