git-svn-id: https://hedgehog.fhcrc.org/bioconductor/trunk/madman/Rpacks/Rdisop@45700 bc3139a8-67e5-0310-9ffc-ced21a209358
... | ... |
@@ -1,6 +1,7 @@ |
1 | 1 |
2010-04-02 Steffen Neumann <sneumann@ipb-halle.de> |
2 | 2 |
* added Selenium to list of elements |
3 | 3 |
* added Cobalt to list of elements |
4 |
+ * fixed Selenium abundances and masses |
|
4 | 5 |
|
5 | 6 |
2010-02-08 Steffen Neumann <sneumann@ipb-halle.de> |
6 | 7 |
* added parameter maxisotopes to getMolecule() and decompose*() |
... | ... |
@@ -1,6 +1,6 @@ |
1 | 1 |
Package: Rdisop |
2 | 2 |
Title: Decomposition of Isotopic Patterns |
3 |
-Version: 1.7.3 |
|
3 |
+Version: 1.7.4 |
|
4 | 4 |
Date: 2010-04-02 |
5 | 5 |
Author: Anton Pervukhin <apervukh@minet.uni-jena.de>, Steffen Neumann <sneumann@ipb-halle.de> |
6 | 6 |
Maintainer: Steffen Neumann <sneumann@ipb-halle.de> |
... | ... |
@@ -116,8 +116,8 @@ initializePSE <- function() { |
116 | 116 |
mo <- list(name="Mo", mass=91, isotope = list( mass=c(0.906809, 0.0, 0.9050853, 0.9058411, 0.9046785, 0.9060205, 0.905054073, 0.0, 0.907477), |
117 | 117 |
abundance=c(0.1484, 0.0, 0.0925, 0.1668, 0.0955, 0.2413, 0.0, 0.0963))) |
118 | 118 |
|
119 |
- se <- list(name="Se", mass=79, isotope = list( mass=c(73.9224746, 74, 75.9192120, 76.9199125, 77.9173076, 78, 79.9165196, 81.9166978)-74, |
|
120 |
- abundance= c( 0.89 , 0.0, 9.37, 7.63, 23.77, 0.0, 49.61, 8.73))) |
|
119 |
+ se <- list(name="Se", mass=74, isotope = list( mass=c(73.9224746, 74, 75, 75.9192120, 76.9199125, 77.9173076, 79, 79.9165196, 81, 81.9166978)-74, |
|
120 |
+ abundance=c( 0.89 , 0, 0, 9.37, 7.63, 23.77, 0, 49.61 , 0, 8.73))) |
|
121 | 121 |
|
122 | 122 |
list(c,h,d,n,o,p,s, na, k, cl, br, f, i, fe, mg, ca, cd, hg, zn, cu, ni, mn, mo, se, co) |
123 | 123 |
} |