Categories
些许欢笑

神作呀!Oh My God!

无意中在豆瓣上看到了一部号称神片的电影《偶滴神啊》,原名好像正是 Oh My God。赶紧找到看了看,真的是神片呀!

最近一直很心水印度元素,跟印度裔的partner聊天的时候都会对他们各种敬仰羡慕。信仰缺失是个问题,但是如果把信仰全部寄托在一些有形无心的事物上,那才是更严重的问题。

这部片子以喜剧的形式,欢笑的探讨了信仰问题。豆瓣确实是神评论的出没地,摘录一段故事:

释迦牟尼佛晚年涅磐时,魔王波旬对他说:“到你末法时期,我叫我的徒子徒孙混入你的僧宝内,穿你的袈裟,破坏你的佛法。他们曲解你的经典,破坏你的戒律,以达到我今天武力不能达到的目的……”佛祖听了魔王的话,久久无语,不一会,两行热泪缓缓流了下来。魔王见此,率众狂笑而去。

联想到在巴塞罗那读书的时候,很多朋友跟我展示他们心中的宗教,跟我传达他们对于宗教和信仰的理解,才发觉原来在国内周围那些临时抱佛脚的根本算不上所谓信仰。某种程度上,我可以算是一个无神论者。我不信奉任何神袛,却也不信奉所谓的“科学教”。在中国,由于几十年教育的摧残,很多人把课本上学到的科学作为了一种信仰。而所谓科学,无非就是人们对于世界运行规律的一些认识而已。相信真理的人,某种程度上便也是一种信仰了。就像对于很多经济学家,“均衡”便是一种信仰一般。不能证有,不能证无。

世事嘛,或许从来都不是非黑即白。不同的情景下,就怕是神也会展现不同的形式吧。那些用神的名义来禁锢自己的,和用科学的名义禁锢自己的,都是自寻的烦恼。临渊羡鱼,不如退而结网。

Categories
些许欢笑

真实的穿透,孤夜的狂欢

hawana

度过了格外忙碌的几周,忙碌着痛苦着,充实着并快乐着。终于决定休憩一下,好好看看一位朋友推荐了好久的电影「乐满哈瓦那」,顺便复习一下好久没碰的西语~

其实影片原名是 Buena Vista Social Club,直译的话便是美景俱乐部。从名字多少可以寻得一丝向往自由的味道。其实我不是很经常看记录片,总觉得真实有的时候难免残忍,难免血淋淋的把一切都摊开。不过这部片子还好,只是真实地记录着一群人的生活,在音乐的人生中快乐或者痛苦的生活。

当时朋友一直在说,这部片子的音乐是多么的曼妙,果不其然。从不觉得突兀,那种强烈而欢快的节奏是一种多么有展现力和穿透性的诉说。情不自禁,在这样的音乐下面仿佛心和文字都随着飘动起来。与其费心用言语来描述,不如循着节奏的起伏,任心情跌宕。这一刻,只消把所有感觉付诸听力,在安静而寒冷的深夜享受伴着音乐孤单的狂欢。

稍稍庆幸自己还能听懂若干西班牙语,西语天生的婉转韵律让音乐变得生加灵动。加之古巴的神秘、想象中的热情与奔放,一切色彩就那么自然的叠加起来,走入真实。看着一群年近古稀的音乐家,在生命的最后时刻还可以这么灿烂的、再无忌惮地绽放,不禁感叹。从寻常的钢琴,到那些不寻常的「诗琴」,还有出神入化的打击乐...乐器只是他们手中的玩物,驾轻就熟,随着情感的波动而动。相比于小时候费尽心力练好一首钢琴曲子就是为了通过考试,这境界显然不一样..

他们打破陈规,走入美国。看着镜头里的老音乐家漫步在纽约的街头,惊叹着这繁华的都市,突然感觉这样的文化冲撞那么的真实,却不突兀。以音乐为生的人,从心底怕就是自由的吧。无论外面是什么样的风景,都不会失去分寸,都只是美丽的别样展示。

看到这样的故事,看到这样真实的激情,真好。此夜,足以狂欢。

Categories
日常应用

不说人话的R报错信息

此文为译文,谨此来纪念那些被R不知所云的稀奇古怪的报错折磨过的凄凉岁月...

Translating Weird R Errors
January 20, 2013
By Slawa Rokicki

原文写的很风趣,时间所限我就简单的翻译一下了。

1. 其实我只是拼错了变量名...

运行这段代码:

prob1<-as.data.frame(cbind(c(1,2,3),c(5,4,3)))
colnames(prob1)<-c("Education","Ethnicity")
table(prob1$education, prob1$Ethnicity)

然后R会报错:

all arguments must have the same length

莫名其妙有木有?其实正确的应该是:

table(prob1$Education, prob1$Ethnicity)

我只是忘了大写了...囧。

2. 我只是调用了不存在的变量....

比如我运行:

prob1$gender_recode <-as.numeric(prob1$Gender==2)

然后就会报错:

replacement has 0 rows, data has 3

但是这样就没问题:

prob1$Educ_recode<-as.numeric(prob1$Education==2)

原因只是gender这个变量不存在....你就不能直接告诉我找不到变量么?

3. 找不到变量?

我这次确保Education是有的,但是居然还是报错?

nrow(prob1[prob1$Education!=1])

报错:

undefined columns selected

而人家只是少打了一个逗号而已嘛...

nrow(prob1[prob1$Education!=1,])

哎,你就不能直接报语法错误嘛!

原文附下:

I love R. I think it's intuitive and clever and overall a great language. But I do get really annoyed sometimes at the completely ridiculous, cryptic error messages it often gives me. This post will go over some of those seemingly nonsensical errors so you don't have to go crazy trying to find the bug in your code.

1. all arguments must have the same length

To start with, I just make up some quick data:

prob1<-as.data.frame(cbind(c(1,2,3),c(5,4,3)))
colnames(prob1)<-c("Education","Ethnicity")

And now I just want to do a simple table but I get this error:

all arguments must have the same length

What the heck. I look back at my dataset and make sure that both those variables are the same length, which they do. The problem here is that I misspelled "Education". There's a missing "a" in there and instead of telling me that I referenced a variable that doesn't exist, R bizarrely tells me to check the length of my variables. Remember: Anytime you get an error, check to make sure you've spelled everything right.

If I do this, everything works out great:

table(prob1$Education, prob1$Ethnicity)

2. replacement has 0 rows, data has 3

A very similar problem, with a very different error message. Let's say I forgot what columns were in my prob1 data and I thought I had a Sex indicator in there. So I try to recode it like this:

This error message is also pretty unhelpful. The syntax is totally correct; the problem is that I just don't have a variable named Sex in my dataset. If I do this instead to recode education, a variable that exists, everything is fine:

prob1$Educ_recode<-as.numeric(prob1$Education==2)

3. undefined columns selected

Ironically, the error we so badly wanted before comes up but for a completely different reason. See if you can find the problem here. I'll take that same little dataset and I just want to know how many rows there are in which Education is not equal to 1.

So, if I want to know the number of rows of the dataframe prob1, I do:

nrow(prob1)

and if I want to know how many have a value of Education not equal to 1, I do the following (incorrectly) and get an error:

Now I check my variable name and I've definitely spelled Education right this time. The problem, actually, is not that I have referenced a column that doesn't exist but I've messed up the syntax to the nrow() function, in that I haven't defined what columns I want to subset. When I do,

prob1[prob1$Education!=1]

this doesn't make any sense, because I'm saying to subset prob1 but to do this I have to specify which rows I want and which columns I want. This just lists one condition in the brackets and it's unclear whether it's for the rows or columns. See my post on subsetting for more details on this.

If I do it the following way, all is good since I'm saying to subset prob1 with only rows with education !=1 and all columns:

nrow(prob1[prob1$Education!=1,])

 

Categories
我的生活状态

Photo of the year, 2012

过去的一年拍了很多很漂亮的照片,我只是没来由的很喜欢这张...虽然当时是匆匆偷拍 -_-|| (先向这位我不认识的路人甲致歉一下)。依旧,点击可见大图。

DSC01000-ss

 

有的时候,可能不是照片本身的色彩啊,取景啊什么的,更多的是里面的韵味、想象力和那种温文尔雅的气质吧。让人不禁心醉的气场。

Categories
游来游去

无锡,无影无踪。

无锡这个城市真的很上相...所以还是忍不住发几张照片。曾经那么辉煌的无锡,也渐渐的开始没落了。很多古迹保存的都不怎么样了,只能潦草看看。不过貌似每次去无锡的时间都不好,上次是盛夏,这次是寒冬,总是一种阴霾的感觉。或许春天樱花盛开的时候,会比较的漂亮吧。

不过,大致近期应该不会再去了吧...已经没什么惦念和留恋的了,无影无踪的就飘过去了。连多一点文字,都小心翼翼的吝啬起来。万般诗情画意,千许浮华词藻,也得有所撩拨才能绽放。心如止水,亦如坚冰。

若无所留恋,便一如匆匆访问过的那些城市一般,沉淀在记忆力的只是若干符号。有人之处,方有快乐。

nEO_IMG_DSC07089
一缕炊烟,清名桥侧。

nEO_IMG_DSC07097
很喜欢这个咖啡书吧。

nEO_IMG_DSC07084
新旧之别:只见新人笑,谁闻旧人哭?

nEO_IMG_DSC07141
破旧的高院:庭院深深深几许。杨柳堆烟,帘幕无重数。

nEO_IMG_DSC07068
水乡依依。

DSC07072
很喜欢的蔓藤铺满墙。

nEO_IMG_DSC07063
又见猫空:你站在桥上看风景,看风景的人在楼上看你。

nEO_IMG_DSC07134
砖窑洞

nEO_IMG_DSC07143
残败的花盆

nEO_IMG_DSC07104
狭窄破落的弄堂。

nEO_IMG_DSC07160
道家之道。

nEO_IMG_DSC07149
繁荣的虚假的南禅寺