Julia Essentials のまとめ

# true, false が予約語(小文字で書く)
x=true
println(x)

# 型は Bool 型
println(typeof(x))

# こんな感じでかける.
y= 1 > 2
println(y)

@printf("T+F = %d\n",true + false)
# 数値に直すと true は 1, false は 0
@printf("sum=%d\n",sum([true,false,false,true]))

#if(1) とかやると  error となる. 以下の様に書く必要がある.
if(convert(Bool,1))
    println("1 is true")
end

#if(0) とか書くとこれも error となる
if(convert(Bool,0))
    println("pass")
else
    println("0 is false")
end

1: use strict;
2: use warnings;
3: # 参照:
4: # http://stackoverflow.com/questions/1036347/how-do-i-use-boolean-variables-in-perl
5: print "true\n"  if(1);
6: print "false\n" unless(0);

 1: if(True):
 2:     print("True")
 3: 
 4: if(False):
 5:     pass
 6: else:
 7:     print("False")
 8: 
 9: if(1):
10:     print("1 is True")
11: 
12: if(0):
13:     pass
14: else:
15:     print("0 is False")

 1: if(TRUE) {
 2:     print("TRUE")
 3: }
 4: if(FALSE) {
 5:     print("pass")
 6: } else {
 7:     print("FALSE")
 8: }
 9: if(1) {
10:     print("1 is TRUE")
11: }
12: if(0) {
13:     print("pass")
14: }else {
15:     print("0 is FALSE")
16: }

 1: if(TRUE)
 2:     puts("TRUE")
 3: end
 4: 
 5: if(true)
 6:     puts("true")
 7: end
 8: 
 9: if(false)
10: else
11:     puts("false")
12: end
13: 
14: puts("FALSE")        unless(FALSE)
15: puts("nil is FALSE") unless(nil)
16: 
17: if(0)
18:    puts("0 is true!!")
19: end

# 1.0 と書くと自動で Float64
# 1   と書くと自動で Int64
println("type of 1.0=",typeof(1.0))
println("type of 1  =",typeof(1))

x=2
y=1.0
# 自動で型を Float64 にしてくれる.
println("x*y=",x*y)
# 累乗は ^ で書く(** ではない. LaTeX 数式)
println("x^2=",x^2)
println("y/x=",y/x)
# 2*x は 2x と書ける(必要あるのかな...)
println("2x-3y=",2x-3y)
# +, * を関数とみなして後ろに引数, 的な書き方もできる.
# なるほど. 一貫してていいような.
println("10+20=",+(10,20))
println("10*20=",*(10,20))

# 複素数 im
# あんまり使わないと思うけどとりあえず書いておく.
x=1+2im
println("1+2i=",x)
y=1-2im
println("1-2i=",y)
x*y
println("x*y=",x*y)

# "" の中で変数を書かせたいときは, $変数 と書くとよい.
println("x=$x")
println("x+y=$(x+y)")

use strict;
use warnings;
my $x=10;
my $y=$x**3;
print $y."\n";

x=10
y=x**3
print(y)

x <- 10
y <- x**3
y
z <- x^3  # これもいける！！
z

x = 10
y = x**3
puts y

1: # tuple の宣言
2: # x = ("foo","bar") でもよい.
3: # x = "foo", "bar"  でもよい.
4: x=tuple("foo","bar")
5: println(x)
6: println(typeof(x))
7: w1, w2 = x
8: println(w1)
9: print(length(x))

x=tuple([1,2,3])
y=(2,3,4)
z=x+y
print(z)
print(type(z))
print(len(z))
for p in z:
    print(p)

1: # 配列の宣言
2: x= [10,20,30,40]
3: println(x)
4: println(typeof(x))
5: println("x[end  ]=",x[end])
6: println("x[end-1]=",x[end-1])
7: println("x[1:3]  =",x[1:3])
8: println("x[2:end]=",x[2:end])

# 文字列と配列
# 部分文字列
println("foobar"[3:end])

 1: # 配列について
 2: a=[1,2,3]  # 列ベクトル
 3: @printf("array a = %s\n", a)
 4: 
 5: # "," をつけないでかくこともできる.
 6: b=[1 2 3]  # 行ベクトルになる.
 7: @printf("array b = %s\n", b)
 8: 
 9: # 行列は以下のように宣言
10: mat=[1 4 7; 2 5 8; 3 6 9]
11: @printf("mat[2,1]  =%d\n",mat[2,1]) # 2 行 1 列目
12: @printf("mat[1,3]  =%d\n",mat[1,3])
13: @printf("mat[1,end]=%d\n",mat[1,end])
14: @printf("mat[4]    =%d\n",mat[4])
15: @printf("mat[end]  =%d\n",mat[end])
16: @printf("mat=%s\n",mat)
17: @printf("mat'=%s\n",mat')  # 転置行列 には ' をつける
18: @printf("mat'=%s\n",transpose(mat)) # transpose 関数でもよい
19: # exit()
20: 
21: col=[1,2,3] # 列ベクトル
22: row=[1 2 3] # 行ベクトル
23: 
24: inn=row*col # 1 つしか要素を持たない配列
25: @printf("inner product=%d\n",inn[1]) # 要素は 1 から始まる.
26: 
27: # 型の表示
28: println(typeof(inn))
29: 
30: # 配列初期化
31: xs = zeros(Float64,5)  # 配列を 0 で初期化
32: print("xs =")
33: println(xs)
34: 
35: xs2=[0.0 for i in 1:5] # リスト内包表記
36: @printf("xs2=%s\n",xs2)
37: 
38: x1=ones(Float64,5) # 1 で初期化
39: # x1=ones(5)       # Float64 は省略可能
40: @printf("x1=%s\n",x1)
41: 
42: # 単位行列
43: mt0=eye(Float64,3)
44: @printf("mt0=%s\n",mt0)
45: 
46: # 3x4 行列(初期化なし)
47: m34=Array(Float64,(3,4))
48: # 適当な値が入ってる
49: @printf("m34=%s\n",m34)

1: ar = [ i*2 for i in 1:9 ]
2: println(length(ar))
3: push!(ar,1)
4: unshift!(ar,2)
5: pop!(ar)
6: shift!(ar)
7: ax=[1,2]
8: append!(ar,ax)
9: println(ar)

 1: use strict;
 2: use warnings;
 3: use Data::Dumper;
 4: 
 5: my $arr=[1 .. 9];
 6: @$arr = map {$_*2} @$arr;
 7: 
 8: print scalar(@$arr)."\n";
 9: push(@$arr,1);            # 後ろ くっつけ
10: unshift(@$arr,1);         # 前   くっつけ
11: pop(@$arr);               # 後ろ 削除
12: shift(@$arr);             # 前   削除
13: my @ax=(1,2);
14: push(@$arr,@ax);
15: 
16: print Data::Dumper->Dump([$arr]);

1: arr = [ i*2 for i in range(1,10)]
2: print(len(arr))  # 長さ
3: arr.append(1)    # 後ろにくっつける
4: arr.insert(0,2)  # 前(0 番目)にくっつける
5: arr.pop()        # 後ろを削除
6: arr.pop(0)       # 前(0 番目)を削除
7: ax = [1,2]
8: arr.extend(ax)   # 後ろにくっつける
9: print(arr)

 1: ar <- 2*seq(1:9)
 2: length(ar)
 3: 
 4: # push
 5: ar <- append(ar,1)
 6: # unshift
 7: ar <- append(ar,2,1)  # append(array,value,index)
 8: # pop
 9: ar <- ar[-length(ar)]
10: # shift
11: ar <- ar[-1]
12: # extend
13: ax <-c(1,2)
14: ar <-append(ar,ax,length(ar))
15: ar

 1: arr = [*1..9]
 2: arr = arr.map {|i| i*2}
 3: puts arr.length
 4: arr.push(1)
 5: arr.unshift(2)
 6: arr.pop
 7: arr.shift
 8: ax = [1,2]
 9: arr.concat(ax)
10: print(arr)

 1: import numpy as np
 2: ar = np.array([ i*2 for i in range(1,10)])
 3: print(len(ar))
 4: ar = np.append(ar,1)
 5: ar = np.insert(ar,0,2)
 6: ar = np.delete(ar,-1)
 7: ar = np.delete(ar, 0)
 8: ax = [1,2]
 9: ar = np.append(ar,ax)
10: print(ar)

1: # tuple は小文字なのに Dict は大文字. おぼえにくい.
2: # {} ではなく () で囲む.
3: # アクセスは hash["key"] で, 配列と同じような書き方.
4: hash = Dict("name" => "Frodo", "age"=>33)
5: println(typeof(hash))
6: println("hash=",hash)
7: println("name=",hash["name"])
8: println("age =",hash["age"])

 1: use strict;
 2: use warnings;
 3: use Data::Dumper;
 4: my $hash={name=>'Frodo',age=>33};
 5: print Data::Dumper->Dump([$hash]);
 6: print $hash->{'name'}."\n";
 7: # print $hash->['name']."\n";  # エラーとなる.
 8: # 以下のようにも書ける.
 9: my %hash=(name=>'Frodo', agen=>33);
10: print $hash{name}."\n";
11: # print $hash['name']."\n";    # こんなふうには書けない.

1: hash={'name':'Frodo','age':33}
2: print(hash)
3: print(hash['name'])

1: hash = {'name'=>'Frodo','age'=>33}
2: puts hash
3: puts hash['age']

1: hash = {'name':'Frodo',age:33}
2: console.log(hash)
3: console.log(hash['name'])

dbls = [2i for i in 1:4]   # 2x 的な書き方をつかってます
println(dbls)

anmls = ["dog","cat","bird"]
pls   = [a * "s" for a in anmls]  # * は文字列連結の意味であることに注意
println(pls)

# 内包表記で二次元配列も作れる
# python でも出来るんだろーか?
p = [i+j for i in 1:3, j in 4:6]
println(p)

# 辞書(hash) もこれで作れる
h = ["$i" => i for i in 1:3]
println(h)

 1: dbls=[ 2*i for i in range(1,5)]
 2: print(dbls)
 3: 
 4: anmls = ["dog","cat","bird"]
 5: pls   = [ a + "s" for a in anmls]
 6: print(pls)
 7: 
 8: # 行列は無理っぽい
 9: # p = [i+j for i in range(1,4), j in range(4,7)]
10: 
11: # hash もそのままでは無理っぽい
12: # h = [ i=>i for i in range(1,4)]