Merge pull request #180 from UA-Libraries-Research-Data-Services/fix-casc-r-images

fix: Correct formatting of images in CAS R recipe

Author: dachambers

rmarkdown/casc.Rmd

@@ -182,16 +182,10 @@ We now have a list of sub-lists of data corresponding to the CAS RNs.
 imgs <- lapply(list, function(x) {charToRaw(x$image)})
 
 # Use 'image_read()' to read SVGs
-
-# "Ethyl cyclohexanepropionate"
 image_read(imgs[[1]], density = 300)
-# "Ethyl 2-nonynoate"
 image_read(imgs[[2]], density = 300)
-# "Ethyl 1<em>H</em>-pyrazole-1-acetate"
 image_read(imgs[[3]], density = 300)
-# "Ethyl 3-(ethoxycarbonyl)benzenepropanoate"
 image_read(imgs[[4]], density = 300)
-# "Ethyl 1-cyclohexene-1-carboximidate"
 image_read(imgs[[5]], density = 300)
 ```
 

src/overview/openalex.rst

@@ -4,13 +4,13 @@ OpenAlex
 Brief Overview
 ****************
 
-The OpenAlex API is an open catalog of the global research system created by the nonprofit OurResearch [#oa1]_ . An API key is not required for this API, but providing your email in requests will provide faster and more consistent response times. Users are required to follow the rate limits of 100000 requests per user per day and 10 requests per second.
+The OpenAlex API is an open catalog of the global research system. An API key is required for this API. Please see Authentication & Pricing page [#oa1]_ in the OpenAlex API documentation for instructions on how to obtain one.
 
-See the OpenAlex API documentation [#oa2]_ for more information on accessing the API. Note that the data in the API is licensed under the Creative Commons CC0 license [#oa3]_ , designating it as part of the public domain. See the OpenAlex Terms of Service [#oa4]_ for more information on how you can use this API.
+See the OpenAlex API documentation [#oa1]_ for more information on accessing the API. Note that the data in the API is licensed under the Creative Commons CC0 license [#oa3]_ , designating it as part of the public domain. See the OpenAlex Terms of Service [#oa4]_ for more information on how you can use this API.
 
 .. rubric:: References
 
-.. [#oa1] `<https://ourresearch.org/>`_
+.. [#oa1] `<https://developers.openalex.org/guides/authentication>`_
 
 .. [#oa2] `<https://developers.openalex.org/>`_
 

src/r/casc.md

@@ -340,39 +340,34 @@ imgs <- lapply(list, function(x) {charToRaw(x$image)})
 
 # Use 'image_read()' to read SVGs
 
-# "Ethyl cyclohexanepropionate"
 image_read(imgs[[1]], density = 300)
 ```
 
 ![](_figures/casc/molecule-loop-1.png)<!-- -->
 
 ``` r
-# "Ethyl 2-nonynoate"
 image_read(imgs[[2]], density = 300)
 ```
 
-![](_figures/casc/molecule-loop-1.png)<!-- -->
+![](_figures/casc/molecule-loop-2.png)<!-- -->
 
 ``` r
-# "Ethyl 1<em>H</em>-pyrazole-1-acetate"
 image_read(imgs[[3]], density = 300)
 ```
 
-![](_figures/casc/molecule-loop-1.png)<!-- -->
+![](_figures/casc/molecule-loop-3.png)<!-- -->
 
 ``` r
-# "Ethyl 3-(ethoxycarbonyl)benzenepropanoate"
 image_read(imgs[[4]], density = 300)
 ```
 
-![](_figures/casc/molecule-loop-1.png)<!-- -->
+![](_figures/casc/molecule-loop-4.png)<!-- -->
 
 ``` r
-# "Ethyl 1-cyclohexene-1-carboximidate"
 image_read(imgs[[5]], density = 300)
 ```
 
-![](_figures/casc/molecule-loop-1.png)<!-- -->
+![](_figures/casc/molecule-loop-5.png)<!-- -->
 
 ### Select Specific Data