-
Notifications
You must be signed in to change notification settings - Fork 0
/
.Rhistory
34 lines (34 loc) · 1.76 KB
/
.Rhistory
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
library(genalg)
library(genalg)
install.packages("genalg")
library(genalg)
library(ggplot2)
# creating dataset
df <- data.frame(id=seq(1,100))
# creating dataset
df <- data.frame(id=seq(1,100),car=rep(1:5))
# creating dataset
df <- data.frame(id=seq(1,100),car=rep(1:5),driver=rep(1:5))
# creating dataset
df <- data.frame(id=seq(1,100),car=rep(1:5),driver=rep(1:5),city=rep=(1:20),distance=runif(n = 100,min = 30,max = 50))
runif(n = 100,min = 30,max = 50)
# creating dataset
df <- data.frame(id=seq(1,100),car=rep(1:5),driver=rep(1:5),city=rep=(1:20,5),distance=runif(n = 100,min = 30,max = 50))
# creating dataset
df <- data.frame(id=seq(1,100),car=rep(1:5,20),driver=rep(1:5,20),city=rep=(1:20,5),distance=runif(n = 100,min = 30,max = 50))
# creating dataset
df <- data.frame(id=seq(1,100),car=runif(100,1,5),driver=runif(100,1,5),city=runif(100,5,20),distance=runif(n = 100,min = 30,max = 50))
# creating dataset
df <- data.frame(id=seq(1,100),car=round(runif(100,1,5)),driver=runif(100,1,5),city=runif(100,5,20),distance=runif(n = 100,min = 30,max = 50))
# creating dataset
df <- data.frame(id=seq(1,100),car=round(runif(100,1,5)),driver=rouned(runif(100,1,5)),city=runif(100,5,20),distance=runif(n = 100,min = 30,max = 50))
# creating dataset
df <- data.frame(id=seq(1,100),car=round(runif(100,1,5)),driver=rounded(runif(100,1,5)),city=runif(100,5,20),distance=runif(n = 100,min = 30,max = 50))
# creating dataset
df <- data.frame(id=seq(1,100),car=round(runif(100,1,5)),driver=round(runif(100,1,5)),city=runif(100,5,20),distance=runif(n = 100,min = 30,max = 50))
# creating dataset
df <- data.frame(id=seq(1,100),car=round(runif(100,1,5)),driver=round(runif(100,1,5)),
city=round(runif(100,5,20)),distance=round(runif(n = 100,min = 30,max = 50)))
library("GA")
install.packages("GA")
library("GA")