Während andere in Deutschland in vergleichbaren Orten mit DSL2.000 dahindümpeln, wird bei mir mal eben die Geschwindigkeit meines Anschlusses zwangsbeschleunigt (vermutlich weil es das 50MBit/s-Angebot nicht mehr gibt). Ich glaub, damit kann ich leben 🙂
Category: Technisches
Zebrzydowice (Gr)
Pflanztopf vs. Übertopf
Wer auch immer sich das hat einfallen lassen, unterschiedliche Blumentöpfe für unterschiedliche Zwecke zu verwenden,möge mir mal den Unterschied zwischen einem Übertopf (links) und einem Pflanztopf (rechts) erklären. Dass man in den einen die Pflanze in einem Extra-Topf reinstellt und in dem anderen direkt was pflanzt, ist mir klar, aber warum soll man das nicht auch umgekehrt machen? Ich fänd’s ja viel praktischer, wenn man einfach den linken Topf als in etwa ein in der Mitte abgesägtes Hyperboloid und den rechten Topf als simplen (Hohl-)kegelschnitt bezeichnen würde, aber das hätte wohl wieder nicht auf die Artikelschilder im Baumarkt gepasst.
Das mit dem Hyperboloid stimmt bei dem linken Topf eh nicht, weil der da ein paar komische Krümmungen hat, aber das ist vielleicht die geometrische Form, die dem Topf am nächsten kommt.
Absperrraccord
Ich war letztes Jahr im Juli schon am Eruieren, wie ich denn schlussendlich meine Grohe-Thermostatarmatur in der Dusche montiert bekomme. Dabei habe ich mich natürlich von der Leitungsverfolgung ablenken lassen und kam zum Schluss, dass man, um das Wasser in der eigenen Wohnung abzustellen, wohl dem ganzen Haus das Wasser abstellen müsse. Das kam mir komisch und irgendwie unschweizerisch vor, weil hier eigentlich alles in verschiedenem Masse besser ist als in Deutschland. Zufällig habe ich mir gestern im Baumarkt die Absperr-Raccords angeschaut (tolle dt.-frz. Wortschöpfung) und dann noch mal die Anschlussrohre daheim angeschaut und dabei ist mir eine klitzekleine Schraube an deren Unterseite aufgefallen (links die Armatur von unten gesehen). Simpler geht’s nicht, das Wasser abzustellen: 90° drehen, egal welche Richtung, dann wird im Rohr eine Klappe verdreht und die Leitung ist zu. Gut, die am Warmwasseranschluss liess sich nur mit Akkuschrauber auf höchster Drehmomentstufe (kurz vorm Bohren) und Richtungswechsel lösen, aber es ging. Reduzierstücke eingebaut, Armatur dran, fertig. Muss ich nicht mehr selber die Temperatur regeln, sondern lasse das die Armatur machen.
Die gestern verlinkte und besuchte Operette Viktoria und ihr Husar war auch sehr angenehm, endlich ist mal keiner auf der Bühne gestorben und lustig war’s auch. Und das Bühnenbild war sehr schön bunt, eine echte Augenweide.
S Bühlerbähnli
Endlich habe ich es mal geschafft, den Bühler-Werkscontainerzubringer auf dem Industriegleis zu fotografieren, direkt auf dem morgendlichen Arbeitsweg bei strahlendem Sonnenschein. Da könnte man eigentlich glatt einen regelmässigen Werkspendelverkehr zum Bahnhof einrichten. Und irgendwann will ich da mal mitfahren, vielleicht zur Feier der Pensionierung 2046 🙂
Butter-Captcha
Winterstechpalme
Was einem am Wegrand im Bäckerweg so auffällt… Neulich war mir ausserdem die Kamera mal runtergefallen, dabei hat’s scheint’s kurz den Akku abgetrennt und alle Einstellungen waren weg. Datum/Uhrzeit hatte ich dann um 12h verstellt eingestellt, aber es gibt ja jhead, mit dem man das direkt in den EXIF-Daten der Bilder korrigieren kann.
Neu gesattelt
Nach gut 40.000km kann man einen Ledersattel durchaus mal tauschen. Die Spannschraube hatte ich zwischenzeitlich schon durch eine längere Schraube ersetzt. Prinzipiell könnte ich den Sattel also locker noch weiter fahren, aber er ist durch zu starkes Fetten inzwischen zu weich geworden. Und, wie bei jedem Brooks-Sattel, den ich bisher hatte: der neue Sattel muss erst eingeritten werden, dann hört auch das Quietschen im Gestell auf. Nach 1.000km dürfte es wieder ruhig sein, und nach schätzungsweise 500km wird der neue Sattel auch so anatomieangepasst wie der alte sein und der Begriff arschbequem wieder zutreffen. Das dauert nur etwas bei meinen momentan sehr geringen Fahrleistungen. Im Vergleich zwischen neu und alt sieht man auch durchaus den Längenunterschied. Als Unterlage hat’s die NZZ von heute mit der Doppelseite über die Seegfrörni (zugefrorener Zürichsee vor 50 Jahren).
Kaffee-Kopfschmerzen-Korrelation
Genau ein Kaffee zum Frühstück, regelmässig über Wochen, und schon gibt’s mittägliche Kopfschmerzen als Entzugserscheinungen bei Nicht-Morgenkaffee. In dem Fall gehe ich aber eher von Kausalität statt Korrelation aus. Frische Luft und Kägi-Fret helfen aber ungemein. Ausserdem ist die Alliteration im Titel irgendwie von den Namen der Big-Bang-Theory-Folgen inspiriert: hier die englische Liste (auf Deutsch kann man das allerdings vergessen, genauso wie die synchronisierte Fassung).
ggplot2, Variablennamen in einer Schlaufe
Sieht so aus, als ob ich nicht der einzige gewesen bin, der versucht hat, in R mit ggplot2 mehrere Variablen eines Data Frames einzeln nacheinander in einer Schleife z.B. in Histogramme zu plotten. Irgendwie wollte ggplot da nicht die Variablennamen annehmen, sondern ich musste einen kleinen Umweg gehen. Letzten Endes hat http://dodata.wordpress.com/2012/10/25/ggplot2-in-loops-and-multiple-plots/ geholfen.
Mit dem untenstehenden Beispiel gibt’s neun bestimmte Variablen eines Data Frames in einem png-Bild in 3×3-Aufteilung inklusive Extra-Titel obendrüber. Nach der Lösung hab ich schon eine Weile gesucht. Es ist allerdings kein commented, minimal, self-contained, reproducible code, den es sonst auf den R-Mailing-Listen erfordert, um keine dämlichen Antworten zu kriegen 🙂
vars <- names(dframe)[c(4,5,6,8,9,12,13,14,50)
dfplot <- dframe
plotlist <- list()
png(filename=paste(plotdirprefix,"015-histogramme-rpm", ".png", sep=""), width=1800,height=900)
for(i in c(1:length(vars))){
varname <- vars[i]
print(varname)
plot <- ggplot(data=dfplot) +
aes_string(x = vars[i]) +
geom_histogram() +
xlab(paste(varname, sep="")) +
ylab("Häufigkeit") +
theme_bw(base_size=20)
plotlist[[varname]] <- plot
}
grid.arrange(plotlist[[1]], plotlist[[2]], plotlist[[3]],
plotlist[[4]], plotlist[[5]], plotlist[[6]],
plotlist[[7]], plotlist[[8]], plotlist[[9]],
widths=c(3,3,3), nrow=3,
main=textGrob(label="Verteilungen Mess-/Stellgrössen", gp=gpar(cex=3)))
dev.off()