Rain II

The world is going back to the mysterious time
The sky is grey
Tiny water drops moves in the air
Enclosing my body
And the ground
Who is hiding behind the tree and spraying?

Rain I

The sky is about to rain outside the window
I am just sitting here
Doing what I can do in life
Freely
Cuz nobody cares what I am doing
Or what I am thinking
Or what I am searching for...

one, two, ...

From Quantum theory of many body systems, Alexandre M. Zagoskin

Policy on Human Cloning

Here is a world map of policy on human cloning


What is opinion of the grey area?

Love me do

-- The Beatles

May It Be

May It Be

May it be an evening star
Shines down upon you
May it be when darkness falls
Your heart will be true
You walk a lonely road
Oh, how far you are from home
Mornie utúlië (darkness has come)
Believe and you will find your way
Mornie alantië (darkness has fallen)
A promise lives within you now
May it be shadows call
Will fly away
May it be your journey on
To light the day
When the night is overcome
You may rise to find the sun
Mornie utúlië (darkness has come)
Believe and you will find your way
Mornie alantië (darkness has fallen)
A promise lives within you now
A promise lives within you now

(Lyrics of May It Be, sung by Enya)

Artificial Gravity?

新看了一部科幻电影: 红色星球 (Red Planet), 它讲了人类第一次登陆火星. 在飞船接近火星时, 来了一次Gamma爆, 飞船损失巨大, 最后没有动力了, 人工引力没了(Artificial Gravity), 里面的东西都飞了起来.

不知红色星球里说的人工引力是怎么产生的? 我看过一个老的科幻电影, 里面人穿着铁鞋子, 而飞船地板有磁性, 这样就不会乱飞了. 但显然这不是上面提到的人工引力.

人是从地球上进化来的, 如果长时间没有引力的话, 人体会有些不良反应. 如何才能产生人造引力呢? 我提两个方法:

方法1:
用大质量的物体在人身上产生类似地球的引力. 比如把一堆高密度的中子放在一个盒子里, 放在飞船底部.但是这样飞船就飞不动了. 好像不行.

方法2:
设想飞船是一个圆盘, 以一定的角动量发射出去, 人生活在边缘, 头朝着圆盘的中心. 好像可以啊.

这些方法有点土, 不知还有什么方法?
______________

另外: 我发现曲线的(rao三声)率的rao我怎么打不出来啊? 书上写的是提手旁加一个环绕的绕的右边, 不知汉字里有这个字吗?
_____
这字是念nao.
08/03/2007

Gross的讲座

今天去了听David Gross的讲座。
讲的是弦论.
有一点:
In string theory, we cannot:
1. Probe arbitrary small distance.
delta x=hc/E+GE/c^4
在量子力学中也是这个样子啊.

2. squeeze a circle to zero size.
底下画了两个圆柱体.不知是不是说:
既然我们把点粒子看成弦, 这条弦就不能再压缩成一点?
----------
不对,好像是和对称性有关 (6/4/2007)

遭遇bug

这几天编了一个求OPE的程序，发现了两个Mathematica 5的bug：
1. Goto语句
Mathematica中自带的例子：
q = 2; Label[begin]; Print[q]; q += 1; If[q < 6, Goto[begin]]
这样写成一排，可以运行，但是如果这样写：
q = 2;
Label[begin];
Print[q];
q += 1;
If[q < 6, Goto[begin]]
即写成几行的形式，就不行了，总是说找不到Label，而通常这两种写法都应该时一样的。平时用的时候也总是说找不到Label。

2. 求导的问题 如果对三阶或三阶以上导数的函数求导，出现问题，而低于三阶就没问题：

也可能是我用错了，如果谁知道，告诉我一下。

另外：

求OPE的程序终于出炉了，有些新优点，终于可以不用传说中的OPEdef.m的那个包了！

海盗分金子？编个程先！！

从前，有5个海盗，100个金币，这5个海盗都是及其聪明并且贪婪，要把这100个金子给分了。5个人轮流提方案，如果超过半数以上的人同意则此方案通过，否则将提方案的这个人给杀了（比如扔进大海）。问最后的分配方案。

作为推广，我们可以假设有n个海盗，n个金币，解决程序(Mathematica)如下：

z = 10;
gold = 200;
(*程序的输入 : 总的海盗数(需 ≥ 5); 总的金币数*)
p = Table[0, {i, z}];
(*海盗拥有金钱列表*)
p[[1]] = 0;
p[[2]] = 0;
p[[3]] = 0;
p[[4]] = gold;
(*4个海盗时的情况, 作为初始值*)
f = 5;
(*从海盗数5开始计算*)
While[
f ≤ z,
a = Table[0, {i, f - 1}];
x = Table[a[[1]]++;
Do[If[a[[j]] == 2, a[[j]] = 0; a[[j + 1]]++], {j, f - 1}]; a, {k, 2^(f - 1) - 1}];
(*所有可能的投票情况*)
n = IntegerPart[(f - 1)/2] + 1;
(*至少要得到n个人的支持*)
y = Table[If[Count[x[[i]], 1] == n, x[[i]], 0], {i, Length[x]}];
y = Union[y]; y = Rest[y];
(*y存储这种方案通过时的支持者情况*)
v = Table[0, {i, Length[y]}, {j, f - 1}];
Do[If[y[[i, j]] == 1, v[[i, j]] = p[[j]] + 1], {i, Length[y]}, {j, f - 1}];
(*v存储各种情况要发放的金币数目, 对支持者需比此方案否决的情况多发一个金币, 反对者不发
*)
s = Table[Apply[Plus, v[[i]]], {i, Length[y]}];
(*选出发放金币最少的那种方案*)
p[[f]] = gold - Min[s];
q = Do[If[Sum[v[[i, j]], {j, f - 1}] == Min[s], Return[v[[i]]]], {
i, Length[y]}];
Do[p[[i]] = q[[i]], {i, f - 1}];
f++; Print[f - 1]
]
p


程序说明：
1. 应该有很多种分配方案，但此程序之给出一种，如果要给出所有，要对程序作一点修改。

2. 适用于海盗数目大于或等于5个的情况。少于5个很容易可以人工推出。如果一定要加入少于5个的情况也可以，只是程序稍微长一点。

3. 本程序不适宜解海盗数目太多的情况，超过20就运行的很慢了。运行时间大约呈2^(海盗人数)增长。

4. 有问题请联系 13321331929 黄俊挺

意识对物质的作用

意识是什么？也许是大脑的活动吧，要这样说，意识也是物质。

前一段时间听一个师兄说了一个故事：比如某个装置正在产生随机数，0和1，在这个过程中如果你一直在想要出现某个数，例如0，那么0就会出现多一些，还说有人做过实验。

今天小小实验了一下。使用Mathetica程序产生随机数。注意这里应该是伪随机数，不是真正的随机数，但是产生随机数的种子好像一直不同，就是不同的时候执行程序都会得到不同的一系列数，我这里就假设种子的产生会对意识有反应吧。
x = Table[ Clear[a]; a = Random[]; If[a ≤ 1/2, a = 0, a = 1], {i, 1, 10000000} ];
Count[x,0]
Count[x,1]

发现程序结果和我所想的有时一样，有时不一样，比例差不多。我试了10次，对5次，错5次。
看来我的大脑对电脑影响不大啊。也许是运行太快了，还来不及产生影响？

如果能加上一个时间延迟的语句就好了，这样运行起来可以时间长一点，可惜不知道Math有没有这个函数。如果有知道的，请告诉我一下。

还有就是有谁知道默认的Random函数的种子是怎么产生的？

导致生活压力的五种观点(转)

一，企图对任何事情都有绝对的控制权。
不仅希望控制过程，还希望能够控制结果。
希望控制别人怎么做，怎么想。
希望能够控制任何事情，甚至包括股市的走势和天气，恨不得连上帝都一起管了。
实际上很多东西我们无法控制，想控制一切的结果就是给自己和别人带来压力。

二，相信自己也能做到。我们从电视、电影、报刊杂志上看到名人们的生活，就相信某一天自己也可以象他们一样。这样的想法常常会给我们带来压力和焦虑，总让我们没有归属感，周围的什么东西都不能够让自己满足。

三，寻求来自外界的满足。很多人总是希望通过外界环境和物质来满足自己，而不是追求来自内心的满足感。这让我们陷入一个怪圈，渴望得到各种东西，然后花很多时间工作，然后希望得到更多，然后花更多时间工作。结果我们得到的可能只是繁重的生活压力。

四，过分看重自我。过于注重个人表现是一个重要的压力来源。确保自己在任何时候都是正确的，且不许任何人质疑，渴望得到尊重和爱戴，希望周围每个人都认可和看重自己，做的每件事情都要得到表扬，不错失任何发表自己观点的机会，为自己的地位感到自豪。如果你是这样的人，那你一定活得挺累。

五，更多更好。上面几条都可以归结于一点，就是总是希望得到比目前更多，变得比现在更好。你可以保证自己始终出于压力之中。

发现行星？怎么过去？

现在发现一颗新行星的新闻普天盖地，因为通过它的大小，距恒星的距离等数据，天文学家猜测上面可能适合人类居住。虽然茫茫宇宙肯定有无数行星适合人类居住，但是发现总有第一个，还是很令人兴奋的，今后可能还会有更多的发现。

虽然到另一个行星转转肯定很爽，但是，如标题所说，怎么过去？20光年对现在来说和无穷大没什么区别，即使人能够以光速运动，也要20年，在飞船上坐20年也会郁闷死的。这样的情况使人不得不想到一个名词－虫洞。《优雅的宇宙》的作者格林认为虫洞也许是可以人为建造的，如果是那样的话，星际旅行就成了现实了。

但是，宇宙中有很多星系比我们这个银河系早几十亿年，有可能存在比我们先进的多的文明，为什么我们从来没见过有外星人通过虫洞到我们这里来，和我们打招呼呢？难道人注定永远也离不开我们生活的母星吗？

我希望答案是否定的。也许外星人就在我们身边只不过处于某种考虑，他们不想打扰我们。

报到

我是本BLOG的自由撰稿人之一，请大家多多支持本博客！