avatar
v*u
2
刚开始读博士,正在选择研究方向,因为不是通讯出身(学控制出身),所以非常迷茫,请教
大牛指点一下应该选择什么具体的研究方向?
导师要求:与 network 相关, 偏重service discovery, self-configuration,context
awarenss的某个方向.看了这方面文献一个月了,还是一头雾水,请问各位前辈具体有什
么好的研究方向吗?给推荐几篇这方面的经典paper!
请大牛不吝赐教,万分感谢!
avatar
c*t
3
发信人: coconut (可可), 信区: Unix
标 题: easy problem
发信站: The unknown SPACE (Tue Jun 6 05:42:09 2000), 站内信件
Use perl/sh or whatever language of your choice to write
a program that is smaller than the following (476 bytes).
#!/bin/sh
cat << PASCAL
1
1 1
1 2 1
1 3 3 1
1 4 6 4 1
1 5 10 10 5 1
1 6 15 20 15 6 1
1 7 21 35 35 21 7 1
1 8 28 56 70 56 28 8 1
1 9 36 84 126 126 84 36 9 1
1 10 45 120 210 252 210 120 45 10 1
1 11 55 165 330 462 462 330 165 55 11 1
1 12 66 220 495 792 924 792 495 220 66 12 1
1 13 7
avatar
b*n
4
Willie Nelson 的版本也不错: 自然。

【在 b********n 的大作中提到】

avatar
R*n
5
I do not familiar this area, but I know it is not communication, en, network
plus system, you could see the top conference papers on the recent years
first,
such as USENIX, OSDI, SIGCOMM and etc

context

【在 v*********u 的大作中提到】
: 刚开始读博士,正在选择研究方向,因为不是通讯出身(学控制出身),所以非常迷茫,请教
: 大牛指点一下应该选择什么具体的研究方向?
: 导师要求:与 network 相关, 偏重service discovery, self-configuration,context
: awarenss的某个方向.看了这方面文献一个月了,还是一头雾水,请问各位前辈具体有什
: 么好的研究方向吗?给推荐几篇这方面的经典paper!
: 请大牛不吝赐教,万分感谢!

avatar
t*t
6
这是啥, 只有更短, 没有最短?

【在 c*****t 的大作中提到】
: 发信人: coconut (可可), 信区: Unix
: 标 题: easy problem
: 发信站: The unknown SPACE (Tue Jun 6 05:42:09 2000), 站内信件
: Use perl/sh or whatever language of your choice to write
: a program that is smaller than the following (476 bytes).
: #!/bin/sh
: cat << PASCAL
: 1
: 1 1
: 1 2 1

avatar
v*u
7
yes, I will try to read some top conference papers. Thank you!

network

【在 R********n 的大作中提到】
: I do not familiar this area, but I know it is not communication, en, network
: plus system, you could see the top conference papers on the recent years
: first,
: such as USENIX, OSDI, SIGCOMM and etc
:
: context

avatar
c*t
8
en

【在 t****t 的大作中提到】
: 这是啥, 只有更短, 没有最短?
avatar
w*i
9
#!/usr/bin/python
x= [1]
for i in range(16):
....for j in x+['\n']: print j,
....x = [(x+[0])[j]+([0]+x)[j] for j in range(i+2)]
avatar
t*t
10
看我写个不一样, 用(read: abuse)RE写的
#!/usr/bin/perl
$a="1";
for $i (1.. 16) {
print "$a\n";
$a=~s/(\d+)(?= (\d+))/$1+$2/ge;
$a="1 $a";
}

【在 w****i 的大作中提到】
: #!/usr/bin/python
: x= [1]
: for i in range(16):
: ....for j in x+['\n']: print j,
: ....x = [(x+[0])[j]+([0]+x)[j] for j in range(i+2)]

avatar
c*t
11
有人写的比你少。。。说是能 54 byte (不算 #!/usr/bin/perl)

【在 t****t 的大作中提到】
: 看我写个不一样, 用(read: abuse)RE写的
: #!/usr/bin/perl
: $a="1";
: for $i (1.. 16) {
: print "$a\n";
: $a=~s/(\d+)(?= (\d+))/$1+$2/ge;
: $a="1 $a";
: }

avatar
t*t
12
肯定有, 我是随便写的.

【在 c*****t 的大作中提到】
: 有人写的比你少。。。说是能 54 byte (不算 #!/usr/bin/perl)
avatar
t*t
13
来, 再随便改一下, 第二行宽66
#!/usr/bin/perl
$_="1\n";for$i(1..16){print;s/(\d+)(?= (\d+))/$1+$2/ge;$_="1 $_";}

【在 t****t 的大作中提到】
: 肯定有, 我是随便写的.
avatar
h*o
14
sub pascal {
while (s/\d+(?= (\d+))/$&+$1/eg < shift) { s/^/1 /; print; }
}
from my code collection. not mine. Do not know whom to credit to.
avatar
m*t
15
Well, here's in 58 ruby bytes:
s=[];16.times{t,l=[],0;s.each{|n|t<
avatar
h*z
16
33 bytes in Matlab is enough:
L=1
for i=1:15
L=[0,L]+[L,0]
end
avatar
w*i
17
This does not produce the exact output

【在 h***z 的大作中提到】
: 33 bytes in Matlab is enough:
: L=1
: for i=1:15
: L=[0,L]+[L,0]
: end

avatar
r*t
18
after u: (in python, but without imports, 有import 肯定不行了)
from numpy import array as a
from numpy import r_ as r
L=a([1])
for i in range(1,16):
....L=r[0,L]+r[L,0]
....print L
每行多俩[ ], 格式还不太对。。

【在 h***z 的大作中提到】
: 33 bytes in Matlab is enough:
: L=1
: for i=1:15
: L=[0,L]+[L,0]
: end

avatar
l*8
19
80 bytes written in C :-)
main(x,y,z){for(y=z=x;x<17;(z=z*--x/y++)||(puts(&z),x=y,y=++z))printf("%d ",z);}
avatar
l*8
20
大家琢磨一下吧,我猜perl/python不用数组可能可以做到更短。反正用C语言声明数组
再加二重循环肯定搞不到80字符一下……
avatar
c*t
21
quote xiangqi's solution (see Unix board JHQ):
print "@_\n" while(@_=(1, map$_[$_-1]+$_[$_], [email protected]_)) < 16;
60 bytes:) and sure it can be shrinked to 54 bytes:)

【在 l***8 的大作中提到】
: 大家琢磨一下吧,我猜perl/python不用数组可能可以做到更短。反正用C语言声明数组
: 再加二重循环肯定搞不到80字符一下……

avatar
t*t
22
hailongniao的思路跟我的是基本一样的, 我参考他的改了改.
$_="\n";while(s/\d+(?= (\d*))/$&+$1/ge<16){s/^/1 /;print}
57 bytes.

【在 c*****t 的大作中提到】
: quote xiangqi's solution (see Unix board JHQ):
: print "@_\n" while(@_=(1, map$_[$_-1]+$_[$_], [email protected]_)) < 16;
: 60 bytes:) and sure it can be shrinked to 54 bytes:)

avatar
c*t
23
They all look like corrupted bytes transferred from modem to me.

【在 t****t 的大作中提到】
: hailongniao的思路跟我的是基本一样的, 我参考他的改了改.
: $_="\n";while(s/\d+(?= (\d*))/$&+$1/ge<16){s/^/1 /;print}
: 57 bytes.

avatar
t*t
24
xiangqi明显是高手, 他的去掉空格是52...
print"@a\n"while(@a=(1,map$a[$_-1]+$a[$_],[email protected]))<16

【在 c*****t 的大作中提到】
: They all look like corrupted bytes transferred from modem to me.
avatar
r*t
25
Even the Matlab and python version?

【在 c*****t 的大作中提到】
: They all look like corrupted bytes transferred from modem to me.
avatar
t*t
26
matlab要格式也可以
L=1;for i=1:16,disp(sprintf('%d ',L));L=[0,L]+[L,0];end
55 bytes. that is, if you don't count the trailing " " of each line...

【在 w****i 的大作中提到】
: This does not produce the exact output
相关阅读
logo
联系我们隐私协议©2024 redian.news
Redian新闻
Redian.news刊载任何文章,不代表同意其说法或描述,仅为提供更多信息,也不构成任何建议。文章信息的合法性及真实性由其作者负责,与Redian.news及其运营公司无关。欢迎投稿,如发现稿件侵权,或作者不愿在本网发表文章,请版权拥有者通知本网处理。