(c)角田 保(大東文化大学 経済学部)
C++については19以降のものを使っています.また, C++のヘッダに以下が記述されているとします.
#include <iostream>
#include <fstream>
#include <string>
#include <vector>
using namespace std;
目次
let S = 0;
let n = 10;
for(let i = 0; i < n; i++){
S += i;
}
int S = 0;
int n = 10;
int i;
for(i = 0; i < n; i++){
S += i;
}
S = 0
n = 10
for i in range(n):
S += i
dim S, i, n
S = 0
n = 10
for i = 0 to n-1
S = S + i
next
S = 0;
for i = 0: n-1
S += i;
end
scalar S = 0
scalar n = 10
forvalues i = 0/(n-1) {
S = S + i
}
S = 0
n = 10
for (i in 0:(n-1)) {
S = S + i
}
S = 0
n = 10
loop i = 0 .. n-1
S += i
endloop
S = 0
n = 10
For[i = 0, i < 10, i++, S += i]
S
let S = 0;
let ary = [0,2,3,10];
for(let elm of ary){
S += elm;
}
int ary[4] = {0,2,3,10};
int S = 0;
for(int elm : ary){
S += elm;
}
ary = [0,2,3,10]
S = 0
for elm in ary:
S += elm
Dim ary(), elm, S
ary = Array(0,2,3,10)
S = 0
for each elm in ary
S = S + elm
next
ary = [0,2,3,10];
S = 0;
for elm = ary
S += elm;
end
foreach v of var x1 x2 x3 {
reg y `v'
}
ary = c(0,2,3,10);
S = 0;
for (elm in ary){
S = S + elm;
}
list xlist = x1 x2 x3
loop foreach i xlist
ols y const $i
endloop
let ary = [10,20,30];
for(let [i, x] of ary.entries()){
console.log(i, x);
}
ary = [10,20,30];
for i, x in enumerate(ary):
print(i, x)
let S = 0;
let i = 5;
if(i % 3 === 0 ){
S = 1;
}else if(i % 3 === 1){
S = 10;
}else{
S = -1;
}
int S = 0;
int i = 5;
if(i % 3 == 0 ){
S = 1;
}else if(i % 3 == 1){
S = 10;
}else{
S = -1;
}
S = 0
i = 5
if i % 3 == 0:
S = 1
elif i % 3 == 1:
S = 10
else:
S = -1
dim S, i
S = 0
i = 5
if i mod 3 = 0 then
S = 1
elseif i mod 3 = 1 then
S = 10
else
S = -1
end if
dim S, i
S = 0
i = 5
if mod(i, 3) == 0
S = 1
elseif mod(i, 3) == 1
S = 10
else
S = -1
end
scalar S = 0
scalar i = 5
if i % 3 == 0{
S = 1
}else if i % 3 == 1{
S = 10
}else{
S = -1
}
end
S = 0;
i = 5;
if(i %% 3 == 0 ){
S = 1;
}else if(i %% 3 == 1){
S = 10;
}else{
S = -1;
}
S = 0
i = 5
if i % 3 == 0
S = 1
elif i % 3 == 1
S = 10
else
S = -1
endif
let i = 5;
let S = (i % 2 == 0)? 10: 1;
int i = 5;
int S = (i % 2 == 0)? 10: 1;
i = 5
S = 10 if i % 2 == 0 else 1
i = 5;
S = If[i % 2 == 0, 10, 100]
let n = 3;
let ary = Array(n).fill(0);
int n = 3;
vector<double> ary(n, 0);
n = 3
ary = [0] * n
import numpy as np
n = 3
ary = np.zeros(n)
Dim ary() As Long
Dim n As Integer
n = 3
ReDim ary(0 To n - 1)
n = 3
ary = numeric(n)
n = 3
ary = Array[0&, n]
let m = 3;
let n = 2;
let A = Array(m).fill([]).map(x => Array(n).fill(0));
int m = 3;
int n = 2;
vector<vector<double> > A(m, vector<double>(n), 0.0);
m = 3
n = 2
A = [[0] * n for i in range(m)]
import numpy as np
m = 3
n = 2
A = np.zeros((m,n))
dim A() As Long
redim A(0 to m - 1, 0 to n - 1)
A = zeros(m, n)
A = J(m, n, 0)
A = matrix(0, nrow = m, ncol = n)
A = zeros(m, n)
Array[0 &, {m, n}]
let A = [[1, 2, 3], [4, 5, 6]]
console.log(A[1][2])
vector<vector<double> > A = {{1, 2, 3},{4, 5, 6}};
cout << A[0][2] << endl
A = [[1, 2, 3], [4, 5, 6]]
print(A[0][2])
dim A() as variant
A = Array(Array(1, 2, 3), Array(4, 5, 6))
MsgBox A(0)(2)
import numpy as np
A=np.array([[1, 2, 3], [4, 5, 7]])
A[1, 0]
Sub test()
dim A
sheets("sheet1").select
A = range("A1:B2").value
msgbox A(2, 1)
End Sub
range(cells(10, 1), cells(11, 2))=A
A=[1, 2, 3; 4, 5, 7]
A(2, 1)
matrix input A=(1, 2, 3\ 4, 5, 7)
display A[2,1]
A=matrix(c(1, 2, 3, 4, 5, 7), nrow=2, ncol=2)
A[2,1]
A={1, 2, 3; 4, 5, 7}
print A[2,1]
A={{1, 2, 3}, {4, 5, 7}}
Part(A, 2, 1)
A[[2, 1]]
a[[2]][[1]]
let ary = [10, 1, 2];
ary.sort((a, b) => a - b)
vector<int> ary = {10, 1, 2};
sort(ary.begin(), ary.end())
sort(ary.begin(), ary.begin() + r)
let ary = [10, 1, 2];
ary.sort()
import numpy as np
ary = np.array([10, 1, 2])
sorted = np.sort(ary)
ary = c(10, 1, 2)
sorted = sort(ary)
ary = {10, 1, 2}
sorted = Sort[ary]
vector<int> ary{10, 1, 2};
int S = accumulate(ary.begin(), ary.end());
import numpy as np
ary = np.array([10, 1, 2])
S = np.sum(ary)
ary = c(10, 1, 2)
S = sum(ary)
ary = {10, 1, 2};
S = Total[ary]
u = [1, 2, 3];
console.log(u.map(x => x ** 2 + 1));
u = [1, 2, 3];
list(map(lambda x: x ** 2 + 1, u));
import numpy as np
u = np.array([1, 2, 3])
u * u + 1
u = c(1, 2, 3)
u * u + 1
u = {1, 2, 3}
Map[Function[x, x^2 + 1], u]
u = [1, 2, 3];
m = u.reduce((s, x) => s + x) / u.length;
tss = u.reduce((s, x) => s + (s - m) ** 2);
u = [1, 2, 3]
m = sum(u)/ len(u)
tss = sum(map(lambda x: (x - m) ** 2, u))
import numpy as np
u = np.array([1, 2, 3])
m = np.mean(u)
tss = np.sum((u - m) ** 2)
u = c(1, 2, 3)
m = mean(u)
tss = sum((u - m) ^ 2)
u = [1, 2, 3];
m = mean(u)
tss = sum((u - m) .^ 2)
u = {1, 2, 3}
tss = sst(u)
import numpy as np
u = np.array([1, 2, 3])
np.var(u, ddof = 1)
np.std(u, ddof = 1)
u = c(1, 2, 3)
var(u)
sd(u)
u = [1, 2, 3];
var(u)
std(u)
u = {1, 2, 3}
var(u)
sd(u)
vector<int> u{1, 2, 3};
vector<int> v{1, 10, 100};
int S = inner_product(u.begin(), u.end(), v.begin());
cout << S << endl
import numpy as np
u = np.array([1, 2, 3])
v = np.array([1, 10, 100])
np.inner(u, v)
u = c(1, 2, 3)
v = c(1, 10, 100)
u %*% v
import numpy as np
A = np.array([[1, 2]; [3, 4]])
A * A + 1
A = [1, 2; 3, 4];
A .^ 2 + 1
A = matrix(c(1, 2, 3, 4), nrow = 2, ncol = 2)
A * A+1
import numpy as np
A = np.array([[10, 1, 2], [1, -1, -10]])
sumS = np.sum(A, axis=0)
meanS = np.mean(A, axis=0)
A = [10, 1, 2;1, -1, -10];
sumS = sum(A, 1)
meanS = mean(A, 1)
A = matrix(c(10, 1, 2, 1, -1, -10), nrow = 2, ncol = 3)
sumS = apply(A, 1, sum)
meanS = apply(A, 1, mean)
A = {10, 1, 2;1, -1, -10};
sumS = sumc(A, 1)
meanS = meanc(A, 1)
import numpy as np
A = np.array([[10, 1, 2], [1, -1, -10]])
B = np.sort(A, axis=0)
A = [10, 1, 2;1, -1, -10];
B = sort(A, 1)
A = matrix(c(10, 1, 2, 1, -1, -10), nrow = 2, ncol = 3)
B = apply(A, 1, sort)
import numpy as np
A = np.array([[1, 2, 3], [4, 5, 6], [7, 8, 9]])
B = A[0:2, 0:2]
C = A[1:, 1:]
D = A[[0, 2], :][:, [0, 2]]
A = [1, 2, 3; 4, 5, 6; 7, 8, 9];
B = A(1:2, 1:2)
C = A(2:end, 2:end)
D = A([1, 3], [1, 3])
A = matrix(c(1, 2, 3, 4, 5, 6, 7, 8, 9), nrow = 3, ncol = 3)
B = A[1:2, 1:2]
C = A[2:3, 2:3]
D = A[c(1, 3), c(1, 3)]
"ab" + String(3)
"ab" + to_string(3)
"ab" + str(3)
"ab" + cstr(3)
strcat("ab", num2str(3))
"ab" + tostring(3)
paste("ab", 3, sep="")
x = 3
sprintf("ab%d", x)
"ab" <> ToString[11]
vector<double> A;
double a;
ifstream fin("test.txt");
while(!fin.fail()){
fin >> a;
A.push_back(a);
}
import numpy as np
A = np.loadtxt('test.txt')
import numpy as np
A = np.loadtxt('test.csv', delimiter = ',')
Sub test()
Dim i, buf, linedataS, mypath, mydelim
Sheets.Add
mypath = "c:\sample\test.txt"
mydelim = " "
Open mypath For Input As #1
i = 1
Do Until EOF(1)
Line Input #1, buf
linedataS = Split(buf, mydelim)
Range(Cells(i, 1 + LBound(linedataS)), Cells(i, 1 + UBound(linedataS))) = linedataS
i = i + 1
Loop
Close #1
End Sub
A = load('test.txt');
vector<int> A = {1, 2, 3};
ofstream fout("test.out");
if (fout.fail()) { // エラーチェック
cout << "出力ファイルをオープンできない" << endl;
return 1;
}
for(int elm : A){
fout << elm << endl;
}
import numpy as np
A = np.array([1, 2, 3])
np.savetxt('test.out', A)
Sub test()
Dim ecell, mypath
mypath = "c:\sample\test.out"
Open mypath For Output As #1
For Each ecell In Selection.Cells
Print #1, ecell.Value
Next
Close #1
End Sub
A = [1, 2, 3];
writematrix(A, 'test.out')
A = [1, 2, 3];
save('test.out', 'A')
save('-ascii', 'test.out', 'A')
A = c(1:10);
write(A, 'test.out', ncolumns = 1)
mydata = read.csv("test.txt", header = TRUE, sep = "")
mydata = read.table("test.txt", header = TRUE, sep = "")
mydata = read.csv("test.csv", header = TRUE, sep = ",")
mydata = read.table("test.csv", header = TRUE, sep = ",")
insheet using test.csv
open test.txt
open test.csv
from scipy import stats
stats.norm.cdf(3, 0, 1)
from scipy.stats import *
norm.cdf(3, 0, 1)
#include <cmath>
double Zcdf(double value)
{
return 0.5 * erfc(-value * sqrt(0.5));
}
double normcdf(double value, double mu, double sigma)
{
return Zcdf((value - mu) / sigma);
}
pkg load statistics
normcdf(3, 0, 1)
normcdf(3)
normprob(3)
pnorm(3, 0, 1)
pnorm(3)
cdf(N, 3)
cdf(Z, 3)
CDF[NormalDistribution[0, 1], 3.0]
from scipy import stats
stats.norm.ppf(0.975, 0, 1)
stats.norm.ppf(0.975)
pkg load statistics
norminv(0.975, 0, 1)
norminv(0.975)
invnorm(0.975)
qnorm(0.975, 0, 1)
qnorm(0.975)
invcdf(N, 0.975)
invcdf(Z, 0.975)
InverseCDF[NormalDistribution[0, 1], 0.975]
前提: aを所与とする.xがx(1),x(2)の2変数関数,f=x(1)2+ax(2)2の最小化するxを数値計算(近似)したい.xtolは10の-8とする.
function y = f(x,a)
y = x(1) ^ 2 + a * x(2) ^ 2;
end
a = 1;
myans = fminsearch(@(x) myfun(x, a), [0, 1], optimset('TolX', 1e-8) )
from scipy.optimize import fmin
def f(x, a):
return x[0] ** 2 + a * x[1] ** 2
a = 1.0
arg = (a, )
fmin(f, [-1, 1.2], args = arg, xtol = 1e-8)