Benutzer Diskussion:Caustic/Archiv
Letzter Kommentar: vor 15 Jahren von Euglena-Amöbe in Abschnitt Vektorisierungen
Image:Geruegte Medien.svg
Hallo Caustic,
zu deinem commons:Image:Geruegte Medien.svg gibt es auf der Diskussionsseite (jetzt auf Commons) Kommentare, die Mängel bzw. eine fehlende Bildlegende anmerken. Bitte trage noch nach, aufgrund welcher Daten du die Grafik angefertigt hast, sonst wird man sie über kurz oder lang als unseriös bzw. ungenügend referenziert löschen müssen. Viele Grüße -- Rosenzweig δ 13:34, 13. Jul. 2008 (CEST)
- Danke für den Hinweis. Die Daten wurden aus einer Rastergrafik, die mittlerweile gelöscht ist, übernommen. Ich habe die aktuellen Zahlen aus der
- Chronik der Rügen seit 1986 erneut extrahiert. Das Ergebnis sieht folgendermaßen aus:
Medium Anzahl der Rügen BILD 109 DRESDNER MORGENPOST 5 EXPRESS 13 ABENDZEITUNG 9 HAMBURGER MORGENPOST 8 STERN 8 B.Z. 15 BERLINER KURIER 7 TAZ 7 TZ 5 COUPÉ 16 sonstige (193 Medien) 251 Insgesamt 453
- Die Abweichung hält sich in Grenzen, weshalb es keinen Grund gibt, die Grafik zu löschen. Eine aktualisierte Version werde ich in einigen Tagen online stellen. Was mit einer fehlenden Legende gemeint ist, ist mir schleierhaft.
- Wenn möglich, verweise bitte auf meine Diskussionsseite, da ich momentan keine Möglichkeit habe auf Commons zu posten. --Caustic 19:43, 14. Jul. 2008 (CEST)
- PS. Die Daten wurden mit folgendem C#-Programm extrahiert:
using System.IO;
using System.Text.RegularExpressions;
using System.Text;
using System.Collections.Generic;
using System.Diagnostics;
namespace Extractor {
class Program {
static void Main(string[] args)
{
Extract(args[0]);
}
public static int Count(StreamReader reader)
{
long oldpos = reader.BaseStream.Seek(0, SeekOrigin.Begin);
int result = 0;
while (!reader.EndOfStream) {
if (reader.ReadLine().Trim().Length > 4)
++result;
}
reader.BaseStream.Position = oldpos;
return result;
}
public static void Extract(string filename)
{
Regex r = new Regex(@"([^0-9\r\n\(\)]+( \((.+)\))?)\s?\(.+\)\*?(\s?- .+ -)? .+",
RegexOptions.Multiline);
StreamReader reader = new StreamReader(filename, Encoding.Default);
MatchCollection matches = r.Matches(reader.ReadToEnd());
Dictionary<string, int> d = new Dictionary<string, int>();
int value = 0;
foreach (Match m in matches) {
string key = m.Groups[1].Value.Trim();
if (key.Contains("BILD")) // Bild, Bild-Online, Bams zusammenfassen
key = "BILD";
else if (key == "BZ" || key == "B.Z")
key = "B.Z.";
else if (key.Contains("EXPRESS"))
key = "EXPRESS";
if (!d.TryGetValue(key, out value))
d.Add(key, 1);
else
++d[key];
}
StreamWriter writer = new StreamWriter(filename + "out.txt");
int total = 0, other = 0, a = 0;
foreach (KeyValuePair<string, int> p in d) {
if (p.Value >= 5) {
writer.WriteLine("{0,25} {1}", p.Key, p.Value);
}
else {
other += p.Value;
++a;
}
total += p.Value;
}
Debug.Assert(Count(reader) == total);
writer.WriteLine("{0,25} {1} Rügen verteilt auf {2} Medien", "sonstige:", other, a);
writer.WriteLine("{0,25} {1}", "Insgesamt:", total);
reader.Close();
writer.Close();
}
}
}
Vektorisierungen
Hallo,
vielen Dank für die zahlreichen Vektorisierungen! Allerdings ist mir aufgefallen, dass das Nat Geo HD-Logo nicht mit der Vorlage übereinstimmt. Könntest du das bitte noch umändern? Wäre ganz klasse.
Vielen Dank und beste Grüße,
--Euglena-Amöbe 13:28, 15. Okt. 2009 (CEST)
- Gern geschehen. Das Nat Geo HD-Logo stammt aus einer Sky PDF-Datei und entspricht damit dem Original (oben HD wählen). Es ist also keine gute Idee, diese Version zu modifizieren. --Caustic 18:10, 15. Okt. 2009 (CEST)
- OK, überredet. Ich hatte nur die Vorlage als "korrekte" Version gehalten. Vieleicht kannst du dir ja bei Gelegenheit noch ein paar andere Sender-Logos aus der Wunschliste vornehmen. Nochmals Danke und viele Grüße, --Euglena-Amöbe 18:26, 15. Okt. 2009 (CEST)