-
Notifications
You must be signed in to change notification settings - Fork 0
/
.Rhistory
92 lines (92 loc) · 2.13 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
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
library(devtools)
library(roxygen2)
document()
document()
document()
document()
library(tlsh)
document()
document()
document()
document()
document()
document()
document()
document()
document()
document()
document()
document()
document()
document()
devtools::load_all(".")
tlsh.blocks <- block_setup_v2(RLdata500, p=20, num.blocks=5, k=2)
head(RLdata500)
tlsh.blocks <- block_setup_v2(RLdata500, p=20, num.blocks=5, k=2)
head(data <- RLdata500[-c(2,4)])
eval.blocksetup(RLdata500, k=5, b=22, key=identity.RLdata500)
head(data <- RLdata500[-c(2,4)])
block_setup_v2(RLdata500, b=22, save_signature=FALSE, k=2)
library(devtools)
library(roxygen2)
document()
document()
document()
document()
document()
document()
document()
tlsh.blocks <- block_setup_v2(r.set = RLdata500[1:500,c(-2)], b=22, save_signature=FALSE, k=2)
block.ids.from.blocking(tlsh.blocks)
document()
document()
document()
document()
library(devtools)
library(roxygen2)
document()
document()
document()
document()
document()
document()
document()
document()
document()
document()
document()
document()
document()
head(data <- RLdata500[-c(2,4)])
eval.blocksetup(RLdata500, k=5, b=22, key=identity.RLdata500)
eval.blocksetup(r.set = RLdata500[1:3,c(-2)], k=5, b=22, key=identity.RLdata500)
head(data <- RLdata500[-c(2,4)])
data <- RLdata500[-c(2,4)]
head(data <- RLdata500[-c(2,4)][1:2])
head(data <- RLdata500[-c(2,4)][1:2,])
eval.blocksetup(data, k=5, b=22, key=identity.RLdata500)
eval.blocksetup(data, k=5, b=22, key=identity.RLdata500[1:2,])
traceback()
r.set <- RLdata500[1:3,c(-2)]
block_setup_v2(r.set = RLdata500[1:3,c(-2)], b=22, save_signature=FALSE, k=2)
rl_data_500_b22_30 <- adply(2:8, .margins=1, .fun = eval.blocksetup, dat = #RLdata500, b=22, .expand=F,key=identity.RLdata500)
)
data(RLdata500)
minidata <- RLdata500[-c(2,4)]
rl_data_500_b26 <- adply(1:5, .margins=1, .fun = eval.blocksetup, dat=minidata, b=26, .expand=F,key=identity.RLdata500)
library(devtools)
library(roxygen2)
document()
library(devtools)
library(roxygen2)
document()
document()
devtools::check_win_release()
devtools::check_win_devel()
use_travis()
use_travis()
document()
library(tlsh)
library(devtools)
library(roxygen2)
document()