Diskussion:CAS-Nummer

aus Wikipedia, der freien Enzyklopädie

Hallo,

was bitte ist "Magic"? Auf der Seite, auf die verlinkt wird, steht leider keine Chemikalie etc... Kann das mal jemand sinnvoll korrigieren, bitte?

Misy 11:06, 27. Feb 2006 (CET)

Ich habe erstmal "Magic" entfernt. Vielleicht ist das so eine Art Droge? Konnte trotz Recherchen keinen Eintrag finden. Die andere Beispiele scheinen ok. Gruß, Tilo 14:21, 27. Feb 2006 (CET)

Die angegebene CAS-RN 331356-73-1 existiert tatsächlich. Es ist allerdings nichts "Magisches", sondern eine von CAS registrierte mRNA-Sequenz aus aus dem Pilz Glomus versiforme auf der Wurzel von Medicago truncatula (eine der Luzerne verwandte Pflanze). Diese mRNA-Sequenz hat eine Länge von 529 Nukleosiden, davon 176 Adenosin, 53 Cytidin, 78 Guanosin und 222 Thymidin.

--Dschanz 00:37, 18. Apr 2006 (CEST)

Inhaltsverzeichnis 1 CAS-Nummer von Viagra? 2 Mathematica-Funktion zur Prüfung von CAS-Nummern 3 CAS-Nummern von "kritischen" Stoffen 4 Statistik

[Bearbeiten] CAS-Nummer von Viagra?

Handelsnamen haben i. d. R. keine eigene CAS-Registry-Nummer. Die angegebene CAS-RN 171599-83-0 ist die von Sildenafilcitrat, dem Salz aus Sildenafil (CAS-RN 139755-83-2) und Zitronensäure (CAS-RN 77-92-9). Sildenafilcitrat ist der eigentliche Wirkstoff in Viagra®, welches selbst eine Medikamentenzubereitung ist, die außer dem Wirkstoff noch galenische Hilfsstoffe enthält ( wie z. B. Bindemittel o. ä.), die nicht durch diese CAS-RN codiert sind.
--Dschanz 16:43, 9. Apr 2006 (CEST)

[Bearbeiten] Mathematica-Funktion zur Prüfung von CAS-Nummern

(*Prüft ob ein Integer #...#### oder ein String "#...#-##-#" das Kriterium \
für eine korrekte CAS-Registernummer erfüllt*)
CASRegistryNumberQ[RN_]:=
    Module[{Z,R,B=False},
      Switch[RN,_Integer,Z=IntegerDigits[RN];
        If[Length[Z]>4,R=Last[Z];Z=Reverse[Drop[Z,-1]];
          B=(Mod[Sum[i*Z[[i]],{i,1,Length[Z]}],10]\[Equal]R)],_String,
        B=StringMatchQ[RN,
            StringExpression[DigitCharacter..,DigitCharacter,"-",
              DigitCharacter,DigitCharacter,"-",DigitCharacter]];
        If[B,Z=IntegerDigits[ToExpression[StringDrop[RN,{-5,-2,3}]]];
          R=Last[Z];Z=Reverse[Drop[Z,-1]];
          B=(Mod[Sum[i*Z[[i]],{i,1,Length[Z]}],10]\[Equal]R)]];B];      

RN1="1316-78-5";
RN2=30986119;
RN3="331356-73-1";

CASRegistryNumberQ["9002-13-5"]
True

CASRegistryNumberQ[331356731^10]
True

Hätte nicht gedacht, dass man ein so einfaches Problem so kompliziert lösen kann..:-D 217.224.164.85 20:42, 6. Jul 2006 (CEST)

Diese Version funktioniert wegen Verwendung von StringExpression nur mit Mathematica-Versionen ab 5.1. 84.154.213.184 16:16, 7. Jul 2006 (CEST)

[Bearbeiten] CAS-Nummern von "kritischen" Stoffen

Die Aussage im Artikel: "Für jeden bekannten chemischen Stoff (auch Biosequenzen, Legierungen, Polymere) existiert eine eindeutige CAS-Nummer." scheint nicht unbedingt richtig zu sein. Die CAS-Nummer von butyl 2-chloro-4-fluorophenoxyacetate, (kurz LNF), SMILES String C1(=CC=C(C(=C1)Cl)OCC(=O)OCCCC)F, einem militärisch verwendeten Entlaubungsmittel (CW; defoliant), ist beispielsweise nicht bekannt. 217.224.154.14 20:00, 13. Sep 2006 (CEST)

[Bearbeiten] Statistik

Die Statistik, es gäbe 30.000 Registrierungen und täglich kommen 7.000 dazu ist nicht richtig, wenn man dem Link (http://www.cas.org/casdb.html) Glauben schenkt. Demnach sind 27.000 CAS-Nummern registriert und täglich kommen 3.000 dazu. Zitat: "Daily updates to the CAplusSM database, adding more than 3,000 records each day totaling more than 27 million currently"