library(tidyverse)
## ── Attaching packages ─────────────────────────────────────── tidyverse 1.3.2 ──
## ✔ ggplot2 3.3.6 ✔ purrr 0.3.4
## ✔ tibble 3.1.8 ✔ dplyr 1.0.10
## ✔ tidyr 1.2.1 ✔ stringr 1.4.1
## ✔ readr 2.1.2 ✔ forcats 0.5.2
## ── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
## ✖ dplyr::filter() masks stats::filter()
## ✖ dplyr::lag() masks stats::lag()
cmcData <- read_csv("datakanker.csv")
## New names:
## • `` -> `...33`
## Warning: One or more parsing issues, see `problems()` for details
## Rows: 568 Columns: 33
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (1): diagnosis
## dbl (31): id, radius_mean, texture_mean, perimeter_mean, area_mean, smoothne...
## lgl (1): ...33
##
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
diagnosis <- as.integer(cmcData$diagnosis == "M")
cmcData$diagnosis <- diagnosis
cmcData
## # A tibble: 568 × 33
## id diagnosis radius_m…¹ textu…² perim…³ area_…⁴ smoot…⁵ compa…⁶ conca…⁷
## <dbl> <int> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
## 1 842302 1 18.0 10.4 123. 1001 0.118 0.278 0.300
## 2 842517 1 20.6 17.8 133. 1326 0.0847 0.0786 0.0869
## 3 84300903 1 19.7 21.2 130 1203 0.110 0.160 0.197
## 4 84348301 1 11.4 20.4 77.6 386. 0.142 0.284 0.241
## 5 84358402 1 20.3 14.3 135. 1297 0.100 0.133 0.198
## 6 843786 1 12.4 15.7 82.6 477. 0.128 0.17 0.158
## 7 844359 1 18.2 20.0 120. 1040 0.0946 0.109 0.113
## 8 84458202 1 13.7 20.8 90.2 578. 0.119 0.164 0.0937
## 9 844981 1 13 21.8 87.5 520. 0.127 0.193 0.186
## 10 84501001 1 12.5 24.0 84.0 476. 0.119 0.240 0.227
## # … with 558 more rows, 24 more variables: `concave points_mean` <dbl>,
## # symmetry_mean <dbl>, fractal_dimension_mean <dbl>, radius_se <dbl>,
## # texture_se <dbl>, perimeter_se <dbl>, area_se <dbl>, smoothness_se <dbl>,
## # compactness_se <dbl>, concavity_se <dbl>, `concave points_se` <dbl>,
## # symmetry_se <dbl>, fractal_dimension_se <dbl>, radius_worst <dbl>,
## # texture_worst <dbl>, perimeter_worst <dbl>, area_worst <dbl>,
## # smoothness_worst <dbl>, compactness_worst <dbl>, concavity_worst <dbl>, …
#data training diambil dari data index ke-50 sampai ke-200 dengan kolom ke-7 sampai ke-12
training <- cmcData[50:200,7:12]
#untuk testing kolom yang dipakai yaitu kolom ke-7 sampai ke-11
testing <- cmcData[201:nrow(cmcData),7:11]
#untuk validasi kolom yang dipakai adalah kolom ke-12
validasi <- cmcData[201:nrow(cmcData),12]
#data_research yang digunakan adalah kolom 7(smoothness_mean) dan 12(Fractal_dimension_mean)
data_research <- cmcData[201:nrow(cmcData),c(7,12)]
training
## # A tibble: 151 × 6
## smoothness_mean compactness_mean concavity_mean concave poi…¹ symme…² fract…³
## <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
## 1 0.0875 0.0770 0.0475 0.0338 0.181 0.0572
## 2 0.0864 0.0497 0.0166 0.0112 0.150 0.0589
## 3 0.0768 0.0606 0.0186 0.0172 0.135 0.0595
## 4 0.0826 0.0475 0.0197 0.0135 0.187 0.0611
## 5 0.115 0.148 0.177 0.106 0.209 0.0631
## 6 0.0906 0.0708 0.0525 0.0333 0.162 0.0568
## 7 0.0952 0.0547 0.0304 0.0228 0.192 0.0591
## 8 0.105 0.127 0.132 0.0899 0.192 0.0596
## 9 0.114 0.136 0.129 0.0812 0.203 0.0676
## 10 0.0806 0.0379 0.000692 0.00417 0.182 0.0550
## # … with 141 more rows, and abbreviated variable names ¹`concave points_mean`,
## # ²symmetry_mean, ³fractal_dimension_mean
testing
## # A tibble: 368 × 5
## smoothness_mean compactness_mean concavity_mean `concave points_mean` symme…¹
## <dbl> <dbl> <dbl> <dbl> <dbl>
## 1 0.0959 0.0809 0.0419 0.0411 0.198
## 2 0.0897 0.120 0.104 0.0749 0.151
## 3 0.114 0.208 0.352 0.162 0.22
## 4 0.132 0.177 0.156 0.0918 0.225
## 5 0.0996 0.106 0.0800 0.0382 0.192
## 6 0.0888 0.0959 0.0755 0.0408 0.159
## 7 0.109 0.0723 0.0176 0.0195 0.193
## 8 0.0877 0.0730 0.0695 0.0539 0.203
## 9 0.100 0.148 0.0870 0.0510 0.185
## 10 0.0818 0.0623 0.0589 0.0316 0.136
## # … with 358 more rows, and abbreviated variable name ¹symmetry_mean
validasi
## # A tibble: 368 × 1
## fractal_dimension_mean
## <dbl>
## 1 0.0601
## 2 0.0549
## 3 0.0623
## 4 0.0742
## 5 0.0637
## 6 0.0599
## 7 0.0628
## 8 0.0522
## 9 0.0731
## 10 0.0553
## # … with 358 more rows
data_research
## # A tibble: 368 × 2
## smoothness_mean fractal_dimension_mean
## <dbl> <dbl>
## 1 0.0959 0.0601
## 2 0.0897 0.0549
## 3 0.114 0.0623
## 4 0.132 0.0742
## 5 0.0996 0.0637
## 6 0.0888 0.0599
## 7 0.109 0.0628
## 8 0.0877 0.0522
## 9 0.100 0.0731
## 10 0.0818 0.0553
## # … with 358 more rows
## Define interval of data
range.data <-apply(training, 2, range)
range.data
## smoothness_mean compactness_mean concavity_mean concave points_mean
## [1,] 0.06251 0.01938 0.0000 0.0000
## [2,] 0.14470 0.34540 0.4268 0.2012
## symmetry_mean fractal_dimension_mean
## [1,] 0.1167 0.05025
## [2,] 0.2906 0.09296
## Set the method and its parameters,
## for example, we use Wang and Mendel's algorithm
method.type <- "WM"
control <- list(num.labels = 15, type.mf = "GAUSSIAN", type.defuz = "WAM",
type.tnorm = "MIN", type.snorm = "MAX", type.implication.func = "ZADEH",
name = "sim-0")
library(frbs)
## Learning step: Generate an FRBS model
object.reg <- frbs.learn(training, range.data, method.type, control)
## Predicting step: Predict for newdata
res.test <- predict(object.reg, testing)
## [1] "note: Some of your new data are out of the previously specified range"
## [1] "note: Some of your new data are out of the previously specified range"
## Display the FRBS model
summary(object.reg)
## The name of model: sim-0
## Model was trained using: WM
## The names of attributes: smoothness_mean compactness_mean concavity_mean concave points_mean symmetry_mean fractal_dimension_mean
## The interval of training data:
## smoothness_mean compactness_mean concavity_mean concave points_mean
## min 0.06251 0.01938 0.0000 0.0000
## max 0.14470 0.34540 0.4268 0.2012
## symmetry_mean fractal_dimension_mean
## min 0.1167 0.05025
## max 0.2906 0.09296
## Type of FRBS model:
## [1] "MAMDANI"
## Type of membership functions:
## [1] "GAUSSIAN"
## Type of t-norm method:
## [1] "Standard t-norm (min)"
## Type of s-norm method:
## [1] "Standard s-norm"
## Type of defuzzification technique:
## [1] "Weighted average method"
## Type of implication function:
## [1] "ZADEH"
## The names of linguistic terms on the input variables:
## [1] "v.1_a.1" "v.1_a.2" "v.1_a.3" "v.1_a.4" "v.1_a.5" "v.1_a.6"
## [7] "v.1_a.7" "v.1_a.8" "v.1_a.9" "v.1_a.10" "v.1_a.11" "v.1_a.12"
## [13] "v.1_a.13" "v.1_a.14" "v.1_a.15" "v.2_a.1" "v.2_a.2" "v.2_a.3"
## [19] "v.2_a.4" "v.2_a.5" "v.2_a.6" "v.2_a.7" "v.2_a.8" "v.2_a.9"
## [25] "v.2_a.10" "v.2_a.11" "v.2_a.12" "v.2_a.13" "v.2_a.14" "v.2_a.15"
## [31] "v.3_a.1" "v.3_a.2" "v.3_a.3" "v.3_a.4" "v.3_a.5" "v.3_a.6"
## [37] "v.3_a.7" "v.3_a.8" "v.3_a.9" "v.3_a.10" "v.3_a.11" "v.3_a.12"
## [43] "v.3_a.13" "v.3_a.14" "v.3_a.15" "v.4_a.1" "v.4_a.2" "v.4_a.3"
## [49] "v.4_a.4" "v.4_a.5" "v.4_a.6" "v.4_a.7" "v.4_a.8" "v.4_a.9"
## [55] "v.4_a.10" "v.4_a.11" "v.4_a.12" "v.4_a.13" "v.4_a.14" "v.4_a.15"
## [61] "v.5_a.1" "v.5_a.2" "v.5_a.3" "v.5_a.4" "v.5_a.5" "v.5_a.6"
## [67] "v.5_a.7" "v.5_a.8" "v.5_a.9" "v.5_a.10" "v.5_a.11" "v.5_a.12"
## [73] "v.5_a.13" "v.5_a.14" "v.5_a.15"
## The parameter values of membership function on the input variable (normalized):
## v.1_a.1 v.1_a.2 v.1_a.3 v.1_a.4 v.1_a.5 v.1_a.6 v.1_a.7
## [1,] 5.000 5.00000000 5.0000000 5.0000000 5.0000000 5.0000000 5.0000000
## [2,] 0.000 0.07142857 0.1428571 0.2142857 0.2857143 0.3571429 0.4285714
## [3,] 0.025 0.02500000 0.0250000 0.0250000 0.0250000 0.0250000 0.0250000
## [4,] NA NA NA NA NA NA NA
## [5,] NA NA NA NA NA NA NA
## v.1_a.8 v.1_a.9 v.1_a.10 v.1_a.11 v.1_a.12 v.1_a.13 v.1_a.14
## [1,] 5.000 5.0000000 5.0000000 5.0000000 5.0000000 5.0000000 5.0000000
## [2,] 0.500 0.5714286 0.6428571 0.7142857 0.7857143 0.8571429 0.9285714
## [3,] 0.025 0.0250000 0.0250000 0.0250000 0.0250000 0.0250000 0.0250000
## [4,] NA NA NA NA NA NA NA
## [5,] NA NA NA NA NA NA NA
## v.1_a.15 v.2_a.1 v.2_a.2 v.2_a.3 v.2_a.4 v.2_a.5 v.2_a.6
## [1,] 5.000 5.000 5.00000000 5.0000000 5.0000000 5.0000000 5.0000000
## [2,] 1.000 0.000 0.07142857 0.1428571 0.2142857 0.2857143 0.3571429
## [3,] 0.025 0.025 0.02500000 0.0250000 0.0250000 0.0250000 0.0250000
## [4,] NA NA NA NA NA NA NA
## [5,] NA NA NA NA NA NA NA
## v.2_a.7 v.2_a.8 v.2_a.9 v.2_a.10 v.2_a.11 v.2_a.12 v.2_a.13
## [1,] 5.0000000 5.000 5.0000000 5.0000000 5.0000000 5.0000000 5.0000000
## [2,] 0.4285714 0.500 0.5714286 0.6428571 0.7142857 0.7857143 0.8571429
## [3,] 0.0250000 0.025 0.0250000 0.0250000 0.0250000 0.0250000 0.0250000
## [4,] NA NA NA NA NA NA NA
## [5,] NA NA NA NA NA NA NA
## v.2_a.14 v.2_a.15 v.3_a.1 v.3_a.2 v.3_a.3 v.3_a.4 v.3_a.5
## [1,] 5.0000000 5.000 5.000 5.00000000 5.0000000 5.0000000 5.0000000
## [2,] 0.9285714 1.000 0.000 0.07142857 0.1428571 0.2142857 0.2857143
## [3,] 0.0250000 0.025 0.025 0.02500000 0.0250000 0.0250000 0.0250000
## [4,] NA NA NA NA NA NA NA
## [5,] NA NA NA NA NA NA NA
## v.3_a.6 v.3_a.7 v.3_a.8 v.3_a.9 v.3_a.10 v.3_a.11 v.3_a.12
## [1,] 5.0000000 5.0000000 5.000 5.0000000 5.0000000 5.0000000 5.0000000
## [2,] 0.3571429 0.4285714 0.500 0.5714286 0.6428571 0.7142857 0.7857143
## [3,] 0.0250000 0.0250000 0.025 0.0250000 0.0250000 0.0250000 0.0250000
## [4,] NA NA NA NA NA NA NA
## [5,] NA NA NA NA NA NA NA
## v.3_a.13 v.3_a.14 v.3_a.15 v.4_a.1 v.4_a.2 v.4_a.3 v.4_a.4
## [1,] 5.0000000 5.0000000 5.000 5.000 5.00000000 5.0000000 5.0000000
## [2,] 0.8571429 0.9285714 1.000 0.000 0.07142857 0.1428571 0.2142857
## [3,] 0.0250000 0.0250000 0.025 0.025 0.02500000 0.0250000 0.0250000
## [4,] NA NA NA NA NA NA NA
## [5,] NA NA NA NA NA NA NA
## v.4_a.5 v.4_a.6 v.4_a.7 v.4_a.8 v.4_a.9 v.4_a.10 v.4_a.11
## [1,] 5.0000000 5.0000000 5.0000000 5.000 5.0000000 5.0000000 5.0000000
## [2,] 0.2857143 0.3571429 0.4285714 0.500 0.5714286 0.6428571 0.7142857
## [3,] 0.0250000 0.0250000 0.0250000 0.025 0.0250000 0.0250000 0.0250000
## [4,] NA NA NA NA NA NA NA
## [5,] NA NA NA NA NA NA NA
## v.4_a.12 v.4_a.13 v.4_a.14 v.4_a.15 v.5_a.1 v.5_a.2 v.5_a.3
## [1,] 5.0000000 5.0000000 5.0000000 5.000 5.000 5.00000000 5.0000000
## [2,] 0.7857143 0.8571429 0.9285714 1.000 0.000 0.07142857 0.1428571
## [3,] 0.0250000 0.0250000 0.0250000 0.025 0.025 0.02500000 0.0250000
## [4,] NA NA NA NA NA NA NA
## [5,] NA NA NA NA NA NA NA
## v.5_a.4 v.5_a.5 v.5_a.6 v.5_a.7 v.5_a.8 v.5_a.9 v.5_a.10
## [1,] 5.0000000 5.0000000 5.0000000 5.0000000 5.000 5.0000000 5.0000000
## [2,] 0.2142857 0.2857143 0.3571429 0.4285714 0.500 0.5714286 0.6428571
## [3,] 0.0250000 0.0250000 0.0250000 0.0250000 0.025 0.0250000 0.0250000
## [4,] NA NA NA NA NA NA NA
## [5,] NA NA NA NA NA NA NA
## v.5_a.11 v.5_a.12 v.5_a.13 v.5_a.14 v.5_a.15
## [1,] 5.0000000 5.0000000 5.0000000 5.0000000 5.000
## [2,] 0.7142857 0.7857143 0.8571429 0.9285714 1.000
## [3,] 0.0250000 0.0250000 0.0250000 0.0250000 0.025
## [4,] NA NA NA NA NA
## [5,] NA NA NA NA NA
## The names of linguistic terms on the output variable:
## [1] "c.1" "c.2" "c.3" "c.4" "c.5" "c.6" "c.7" "c.8" "c.9" "c.10"
## [11] "c.11" "c.12" "c.13" "c.14" "c.15"
## The parameter values of membership function on the output variable (normalized):
## c.1 c.2 c.3 c.4 c.5 c.6 c.7 c.8
## [1,] 5.000 5.00000000 5.0000000 5.0000000 5.0000000 5.0000000 5.0000000 5.000
## [2,] 0.000 0.07142857 0.1428571 0.2142857 0.2857143 0.3571429 0.4285714 0.500
## [3,] 0.025 0.02500000 0.0250000 0.0250000 0.0250000 0.0250000 0.0250000 0.025
## [4,] NA NA NA NA NA NA NA NA
## [5,] NA NA NA NA NA NA NA NA
## c.9 c.10 c.11 c.12 c.13 c.14 c.15
## [1,] 5.0000000 5.0000000 5.0000000 5.0000000 5.0000000 5.0000000 5.000
## [2,] 0.5714286 0.6428571 0.7142857 0.7857143 0.8571429 0.9285714 1.000
## [3,] 0.0250000 0.0250000 0.0250000 0.0250000 0.0250000 0.0250000 0.025
## [4,] NA NA NA NA NA NA NA
## [5,] NA NA NA NA NA NA NA
## The number of linguistic terms on each variables
## smoothness_mean compactness_mean concavity_mean concave points_mean
## [1,] 15 15 15 15
## symmetry_mean fractal_dimension_mean
## [1,] 15 15
## The fuzzy IF-THEN rules:
## V1 V2 V3 V4 V5 V6 V7 V8 V9
## 1 IF smoothness_mean is v.1_a.7 and compactness_mean is v.2_a.7 and
## 2 IF smoothness_mean is v.1_a.5 and compactness_mean is v.2_a.3 and
## 3 IF smoothness_mean is v.1_a.7 and compactness_mean is v.2_a.7 and
## 4 IF smoothness_mean is v.1_a.8 and compactness_mean is v.2_a.3 and
## 5 IF smoothness_mean is v.1_a.9 and compactness_mean is v.2_a.7 and
## 6 IF smoothness_mean is v.1_a.10 and compactness_mean is v.2_a.8 and
## 7 IF smoothness_mean is v.1_a.12 and compactness_mean is v.2_a.15 and
## 8 IF smoothness_mean is v.1_a.1 and compactness_mean is v.2_a.1 and
## 9 IF smoothness_mean is v.1_a.14 and compactness_mean is v.2_a.8 and
## 10 IF smoothness_mean is v.1_a.8 and compactness_mean is v.2_a.4 and
## 11 IF smoothness_mean is v.1_a.5 and compactness_mean is v.2_a.2 and
## 12 IF smoothness_mean is v.1_a.9 and compactness_mean is v.2_a.4 and
## 13 IF smoothness_mean is v.1_a.10 and compactness_mean is v.2_a.6 and
## 14 IF smoothness_mean is v.1_a.5 and compactness_mean is v.2_a.5 and
## 15 IF smoothness_mean is v.1_a.7 and compactness_mean is v.2_a.3 and
## 16 IF smoothness_mean is v.1_a.3 and compactness_mean is v.2_a.2 and
## 17 IF smoothness_mean is v.1_a.2 and compactness_mean is v.2_a.1 and
## 18 IF smoothness_mean is v.1_a.9 and compactness_mean is v.2_a.4 and
## 19 IF smoothness_mean is v.1_a.9 and compactness_mean is v.2_a.5 and
## 20 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.5 and
## 21 IF smoothness_mean is v.1_a.5 and compactness_mean is v.2_a.5 and
## 22 IF smoothness_mean is v.1_a.5 and compactness_mean is v.2_a.4 and
## 23 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.5 and
## 24 IF smoothness_mean is v.1_a.7 and compactness_mean is v.2_a.5 and
## 25 IF smoothness_mean is v.1_a.10 and compactness_mean is v.2_a.3 and
## 26 IF smoothness_mean is v.1_a.10 and compactness_mean is v.2_a.6 and
## 27 IF smoothness_mean is v.1_a.5 and compactness_mean is v.2_a.6 and
## 28 IF smoothness_mean is v.1_a.5 and compactness_mean is v.2_a.4 and
## 29 IF smoothness_mean is v.1_a.8 and compactness_mean is v.2_a.3 and
## 30 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.2 and
## 31 IF smoothness_mean is v.1_a.11 and compactness_mean is v.2_a.8 and
## 32 IF smoothness_mean is v.1_a.9 and compactness_mean is v.2_a.5 and
## 33 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.4 and
## 34 IF smoothness_mean is v.1_a.10 and compactness_mean is v.2_a.6 and
## 35 IF smoothness_mean is v.1_a.7 and compactness_mean is v.2_a.3 and
## 36 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.4 and
## 37 IF smoothness_mean is v.1_a.9 and compactness_mean is v.2_a.7 and
## 38 IF smoothness_mean is v.1_a.7 and compactness_mean is v.2_a.5 and
## 39 IF smoothness_mean is v.1_a.10 and compactness_mean is v.2_a.6 and
## 40 IF smoothness_mean is v.1_a.10 and compactness_mean is v.2_a.4 and
## 41 IF smoothness_mean is v.1_a.7 and compactness_mean is v.2_a.5 and
## 42 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.4 and
## 43 IF smoothness_mean is v.1_a.4 and compactness_mean is v.2_a.2 and
## 44 IF smoothness_mean is v.1_a.3 and compactness_mean is v.2_a.4 and
## 45 IF smoothness_mean is v.1_a.9 and compactness_mean is v.2_a.8 and
## 46 IF smoothness_mean is v.1_a.10 and compactness_mean is v.2_a.8 and
## 47 IF smoothness_mean is v.1_a.8 and compactness_mean is v.2_a.3 and
## 48 IF smoothness_mean is v.1_a.4 and compactness_mean is v.2_a.4 and
## 49 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.3 and
## 50 IF smoothness_mean is v.1_a.7 and compactness_mean is v.2_a.4 and
## 51 IF smoothness_mean is v.1_a.8 and compactness_mean is v.2_a.6 and
## 52 IF smoothness_mean is v.1_a.5 and compactness_mean is v.2_a.3 and
## 53 IF smoothness_mean is v.1_a.8 and compactness_mean is v.2_a.7 and
## 54 IF smoothness_mean is v.1_a.10 and compactness_mean is v.2_a.5 and
## 55 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.2 and
## 56 IF smoothness_mean is v.1_a.5 and compactness_mean is v.2_a.4 and
## 57 IF smoothness_mean is v.1_a.4 and compactness_mean is v.2_a.2 and
## 58 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.5 and
## 59 IF smoothness_mean is v.1_a.13 and compactness_mean is v.2_a.12 and
## 60 IF smoothness_mean is v.1_a.9 and compactness_mean is v.2_a.5 and
## 61 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.3 and
## 62 IF smoothness_mean is v.1_a.5 and compactness_mean is v.2_a.2 and
## 63 IF smoothness_mean is v.1_a.10 and compactness_mean is v.2_a.12 and
## 64 IF smoothness_mean is v.1_a.5 and compactness_mean is v.2_a.3 and
## 65 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.3 and
## 66 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.2 and
## 67 IF smoothness_mean is v.1_a.8 and compactness_mean is v.2_a.9 and
## 68 IF smoothness_mean is v.1_a.8 and compactness_mean is v.2_a.9 and
## 69 IF smoothness_mean is v.1_a.8 and compactness_mean is v.2_a.9 and
## 70 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.6 and
## 71 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.3 and
## 72 IF smoothness_mean is v.1_a.8 and compactness_mean is v.2_a.7 and
## 73 IF smoothness_mean is v.1_a.7 and compactness_mean is v.2_a.3 and
## 74 IF smoothness_mean is v.1_a.4 and compactness_mean is v.2_a.2 and
## 75 IF smoothness_mean is v.1_a.2 and compactness_mean is v.2_a.3 and
## 76 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.4 and
## 77 IF smoothness_mean is v.1_a.10 and compactness_mean is v.2_a.4 and
## 78 IF smoothness_mean is v.1_a.7 and compactness_mean is v.2_a.2 and
## 79 IF smoothness_mean is v.1_a.4 and compactness_mean is v.2_a.3 and
## 80 IF smoothness_mean is v.1_a.3 and compactness_mean is v.2_a.2 and
## 81 IF smoothness_mean is v.1_a.7 and compactness_mean is v.2_a.5 and
## 82 IF smoothness_mean is v.1_a.4 and compactness_mean is v.2_a.4 and
## 83 IF smoothness_mean is v.1_a.10 and compactness_mean is v.2_a.7 and
## 84 IF smoothness_mean is v.1_a.7 and compactness_mean is v.2_a.3 and
## 85 IF smoothness_mean is v.1_a.5 and compactness_mean is v.2_a.4 and
## 86 IF smoothness_mean is v.1_a.12 and compactness_mean is v.2_a.4 and
## 87 IF smoothness_mean is v.1_a.8 and compactness_mean is v.2_a.4 and
## 88 IF smoothness_mean is v.1_a.9 and compactness_mean is v.2_a.7 and
## 89 IF smoothness_mean is v.1_a.8 and compactness_mean is v.2_a.5 and
## 90 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.4 and
## 91 IF smoothness_mean is v.1_a.12 and compactness_mean is v.2_a.7 and
## 92 IF smoothness_mean is v.1_a.12 and compactness_mean is v.2_a.5 and
## 93 IF smoothness_mean is v.1_a.7 and compactness_mean is v.2_a.5 and
## 94 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.4 and
## 95 IF smoothness_mean is v.1_a.10 and compactness_mean is v.2_a.7 and
## 96 IF smoothness_mean is v.1_a.5 and compactness_mean is v.2_a.3 and
## 97 IF smoothness_mean is v.1_a.8 and compactness_mean is v.2_a.6 and
## 98 IF smoothness_mean is v.1_a.9 and compactness_mean is v.2_a.4 and
## 99 IF smoothness_mean is v.1_a.9 and compactness_mean is v.2_a.7 and
## 100 IF smoothness_mean is v.1_a.7 and compactness_mean is v.2_a.4 and
## 101 IF smoothness_mean is v.1_a.9 and compactness_mean is v.2_a.11 and
## 102 IF smoothness_mean is v.1_a.7 and compactness_mean is v.2_a.3 and
## 103 IF smoothness_mean is v.1_a.8 and compactness_mean is v.2_a.12 and
## 104 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.5 and
## 105 IF smoothness_mean is v.1_a.7 and compactness_mean is v.2_a.4 and
## 106 IF smoothness_mean is v.1_a.7 and compactness_mean is v.2_a.4 and
## 107 IF smoothness_mean is v.1_a.10 and compactness_mean is v.2_a.7 and
## 108 IF smoothness_mean is v.1_a.5 and compactness_mean is v.2_a.2 and
## 109 IF smoothness_mean is v.1_a.9 and compactness_mean is v.2_a.8 and
## 110 IF smoothness_mean is v.1_a.3 and compactness_mean is v.2_a.3 and
## 111 IF smoothness_mean is v.1_a.4 and compactness_mean is v.2_a.5 and
## 112 IF smoothness_mean is v.1_a.7 and compactness_mean is v.2_a.4 and
## 113 IF smoothness_mean is v.1_a.4 and compactness_mean is v.2_a.3 and
## 114 IF smoothness_mean is v.1_a.4 and compactness_mean is v.2_a.2 and
## 115 IF smoothness_mean is v.1_a.5 and compactness_mean is v.2_a.2 and
## 116 IF smoothness_mean is v.1_a.7 and compactness_mean is v.2_a.4 and
## 117 IF smoothness_mean is v.1_a.5 and compactness_mean is v.2_a.3 and
## 118 IF smoothness_mean is v.1_a.8 and compactness_mean is v.2_a.6 and
## 119 IF smoothness_mean is v.1_a.10 and compactness_mean is v.2_a.3 and
## 120 IF smoothness_mean is v.1_a.8 and compactness_mean is v.2_a.4 and
## 121 IF smoothness_mean is v.1_a.7 and compactness_mean is v.2_a.6 and
## 122 IF smoothness_mean is v.1_a.9 and compactness_mean is v.2_a.6 and
## 123 IF smoothness_mean is v.1_a.8 and compactness_mean is v.2_a.7 and
## 124 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.4 and
## 125 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.3 and
## 126 IF smoothness_mean is v.1_a.8 and compactness_mean is v.2_a.2 and
## 127 IF smoothness_mean is v.1_a.7 and compactness_mean is v.2_a.3 and
## 128 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.2 and
## 129 IF smoothness_mean is v.1_a.8 and compactness_mean is v.2_a.5 and
## 130 IF smoothness_mean is v.1_a.4 and compactness_mean is v.2_a.2 and
## 131 IF smoothness_mean is v.1_a.4 and compactness_mean is v.2_a.2 and
## 132 IF smoothness_mean is v.1_a.10 and compactness_mean is v.2_a.5 and
## 133 IF smoothness_mean is v.1_a.9 and compactness_mean is v.2_a.6 and
## 134 IF smoothness_mean is v.1_a.7 and compactness_mean is v.2_a.2 and
## 135 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.3 and
## 136 IF smoothness_mean is v.1_a.15 and compactness_mean is v.2_a.12 and
## 137 IF smoothness_mean is v.1_a.11 and compactness_mean is v.2_a.6 and
## 138 IF smoothness_mean is v.1_a.5 and compactness_mean is v.2_a.3 and
## 139 IF smoothness_mean is v.1_a.7 and compactness_mean is v.2_a.2 and
## 140 IF smoothness_mean is v.1_a.5 and compactness_mean is v.2_a.3 and
## 141 IF smoothness_mean is v.1_a.8 and compactness_mean is v.2_a.6 and
## 142 IF smoothness_mean is v.1_a.7 and compactness_mean is v.2_a.4 and
## 143 IF smoothness_mean is v.1_a.8 and compactness_mean is v.2_a.3 and
## 144 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.6 and
## 145 IF smoothness_mean is v.1_a.3 and compactness_mean is v.2_a.3 and
## 146 IF smoothness_mean is v.1_a.9 and compactness_mean is v.2_a.6 and
## 147 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.6 and
## 148 IF smoothness_mean is v.1_a.4 and compactness_mean is v.2_a.10 and
## 149 IF smoothness_mean is v.1_a.6 and compactness_mean is v.2_a.4 and
## 150 IF smoothness_mean is v.1_a.9 and compactness_mean is v.2_a.7 and
## V10 V11 V12 V13 V14 V15 V16 V17
## 1 concavity_mean is v.3_a.7 and concave points_mean is v.4_a.7 and
## 2 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.3 and
## 3 concavity_mean is v.3_a.4 and concave points_mean is v.4_a.3 and
## 4 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.3 and
## 5 concavity_mean is v.3_a.5 and concave points_mean is v.4_a.6 and
## 6 concavity_mean is v.3_a.5 and concave points_mean is v.4_a.7 and
## 7 concavity_mean is v.3_a.13 and concave points_mean is v.4_a.12 and
## 8 concavity_mean is v.3_a.1 and concave points_mean is v.4_a.1 and
## 9 concavity_mean is v.3_a.8 and concave points_mean is v.4_a.8 and
## 10 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.3 and
## 11 concavity_mean is v.3_a.1 and concave points_mean is v.4_a.1 and
## 12 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.2 and
## 13 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.3 and
## 14 concavity_mean is v.3_a.5 and concave points_mean is v.4_a.8 and
## 15 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.2 and
## 16 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.3 and
## 17 concavity_mean is v.3_a.1 and concave points_mean is v.4_a.1 and
## 18 concavity_mean is v.3_a.3 and concave points_mean is v.4_a.3 and
## 19 concavity_mean is v.3_a.4 and concave points_mean is v.4_a.5 and
## 20 concavity_mean is v.3_a.5 and concave points_mean is v.4_a.6 and
## 21 concavity_mean is v.3_a.5 and concave points_mean is v.4_a.8 and
## 22 concavity_mean is v.3_a.4 and concave points_mean is v.4_a.5 and
## 23 concavity_mean is v.3_a.6 and concave points_mean is v.4_a.7 and
## 24 concavity_mean is v.3_a.5 and concave points_mean is v.4_a.5 and
## 25 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.3 and
## 26 concavity_mean is v.3_a.5 and concave points_mean is v.4_a.7 and
## 27 concavity_mean is v.3_a.5 and concave points_mean is v.4_a.6 and
## 28 concavity_mean is v.3_a.3 and concave points_mean is v.4_a.4 and
## 29 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.2 and
## 30 concavity_mean is v.3_a.1 and concave points_mean is v.4_a.1 and
## 31 concavity_mean is v.3_a.7 and concave points_mean is v.4_a.11 and
## 32 concavity_mean is v.3_a.6 and concave points_mean is v.4_a.7 and
## 33 concavity_mean is v.3_a.3 and concave points_mean is v.4_a.3 and
## 34 concavity_mean is v.3_a.6 and concave points_mean is v.4_a.7 and
## 35 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.2 and
## 36 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.3 and
## 37 concavity_mean is v.3_a.9 and concave points_mean is v.4_a.10 and
## 38 concavity_mean is v.3_a.4 and concave points_mean is v.4_a.5 and
## 39 concavity_mean is v.3_a.4 and concave points_mean is v.4_a.6 and
## 40 concavity_mean is v.3_a.1 and concave points_mean is v.4_a.2 and
## 41 concavity_mean is v.3_a.5 and concave points_mean is v.4_a.7 and
## 42 concavity_mean is v.3_a.4 and concave points_mean is v.4_a.6 and
## 43 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.2 and
## 44 concavity_mean is v.3_a.5 and concave points_mean is v.4_a.5 and
## 45 concavity_mean is v.3_a.10 and concave points_mean is v.4_a.14 and
## 46 concavity_mean is v.3_a.8 and concave points_mean is v.4_a.8 and
## 47 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.3 and
## 48 concavity_mean is v.3_a.4 and concave points_mean is v.4_a.5 and
## 49 concavity_mean is v.3_a.3 and concave points_mean is v.4_a.3 and
## 50 concavity_mean is v.3_a.3 and concave points_mean is v.4_a.5 and
## 51 concavity_mean is v.3_a.5 and concave points_mean is v.4_a.7 and
## 52 concavity_mean is v.3_a.3 and concave points_mean is v.4_a.5 and
## 53 concavity_mean is v.3_a.8 and concave points_mean is v.4_a.8 and
## 54 concavity_mean is v.3_a.3 and concave points_mean is v.4_a.4 and
## 55 concavity_mean is v.3_a.1 and concave points_mean is v.4_a.1 and
## 56 concavity_mean is v.3_a.3 and concave points_mean is v.4_a.3 and
## 57 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.2 and
## 58 concavity_mean is v.3_a.5 and concave points_mean is v.4_a.7 and
## 59 concavity_mean is v.3_a.15 and concave points_mean is v.4_a.14 and
## 60 concavity_mean is v.3_a.3 and concave points_mean is v.4_a.4 and
## 61 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.3 and
## 62 concavity_mean is v.3_a.1 and concave points_mean is v.4_a.2 and
## 63 concavity_mean is v.3_a.9 and concave points_mean is v.4_a.11 and
## 64 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.2 and
## 65 concavity_mean is v.3_a.3 and concave points_mean is v.4_a.3 and
## 66 concavity_mean is v.3_a.1 and concave points_mean is v.4_a.1 and
## 67 concavity_mean is v.3_a.7 and concave points_mean is v.4_a.9 and
## 68 concavity_mean is v.3_a.7 and concave points_mean is v.4_a.7 and
## 69 concavity_mean is v.3_a.8 and concave points_mean is v.4_a.7 and
## 70 concavity_mean is v.3_a.5 and concave points_mean is v.4_a.3 and
## 71 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.3 and
## 72 concavity_mean is v.3_a.9 and concave points_mean is v.4_a.9 and
## 73 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.3 and
## 74 concavity_mean is v.3_a.1 and concave points_mean is v.4_a.1 and
## 75 concavity_mean is v.3_a.4 and concave points_mean is v.4_a.3 and
## 76 concavity_mean is v.3_a.3 and concave points_mean is v.4_a.3 and
## 77 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.2 and
## 78 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.2 and
## 79 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.2 and
## 80 concavity_mean is v.3_a.1 and concave points_mean is v.4_a.1 and
## 81 concavity_mean is v.3_a.4 and concave points_mean is v.4_a.5 and
## 82 concavity_mean is v.3_a.3 and concave points_mean is v.4_a.3 and
## 83 concavity_mean is v.3_a.5 and concave points_mean is v.4_a.7 and
## 84 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.3 and
## 85 concavity_mean is v.3_a.4 and concave points_mean is v.4_a.6 and
## 86 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.2 and
## 87 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.2 and
## 88 concavity_mean is v.3_a.6 and concave points_mean is v.4_a.6 and
## 89 concavity_mean is v.3_a.3 and concave points_mean is v.4_a.3 and
## 90 concavity_mean is v.3_a.5 and concave points_mean is v.4_a.6 and
## 91 concavity_mean is v.3_a.8 and concave points_mean is v.4_a.9 and
## 92 concavity_mean is v.3_a.3 and concave points_mean is v.4_a.6 and
## 93 concavity_mean is v.3_a.4 and concave points_mean is v.4_a.5 and
## 94 concavity_mean is v.3_a.3 and concave points_mean is v.4_a.5 and
## 95 concavity_mean is v.3_a.7 and concave points_mean is v.4_a.7 and
## 96 concavity_mean is v.3_a.3 and concave points_mean is v.4_a.3 and
## 97 concavity_mean is v.3_a.5 and concave points_mean is v.4_a.4 and
## 98 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.3 and
## 99 concavity_mean is v.3_a.7 and concave points_mean is v.4_a.8 and
## 100 concavity_mean is v.3_a.3 and concave points_mean is v.4_a.3 and
## 101 concavity_mean is v.3_a.7 and concave points_mean is v.4_a.6 and
## 102 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.3 and
## 103 concavity_mean is v.3_a.12 and concave points_mean is v.4_a.14 and
## 104 concavity_mean is v.3_a.3 and concave points_mean is v.4_a.3 and
## 105 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.2 and
## 106 concavity_mean is v.3_a.4 and concave points_mean is v.4_a.4 and
## 107 concavity_mean is v.3_a.7 and concave points_mean is v.4_a.8 and
## 108 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.2 and
## 109 concavity_mean is v.3_a.7 and concave points_mean is v.4_a.7 and
## 110 concavity_mean is v.3_a.3 and concave points_mean is v.4_a.3 and
## 111 concavity_mean is v.3_a.4 and concave points_mean is v.4_a.3 and
## 112 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.3 and
## 113 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.2 and
## 114 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.2 and
## 115 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.2 and
## 116 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.2 and
## 117 concavity_mean is v.3_a.1 and concave points_mean is v.4_a.2 and
## 118 concavity_mean is v.3_a.4 and concave points_mean is v.4_a.5 and
## 119 concavity_mean is v.3_a.1 and concave points_mean is v.4_a.1 and
## 120 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.2 and
## 121 concavity_mean is v.3_a.5 and concave points_mean is v.4_a.4 and
## 122 concavity_mean is v.3_a.5 and concave points_mean is v.4_a.6 and
## 123 concavity_mean is v.3_a.7 and concave points_mean is v.4_a.7 and
## 124 concavity_mean is v.3_a.4 and concave points_mean is v.4_a.3 and
## 125 concavity_mean is v.3_a.3 and concave points_mean is v.4_a.3 and
## 126 concavity_mean is v.3_a.1 and concave points_mean is v.4_a.2 and
## 127 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.3 and
## 128 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.2 and
## 129 concavity_mean is v.3_a.6 and concave points_mean is v.4_a.7 and
## 130 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.3 and
## 131 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.3 and
## 132 concavity_mean is v.3_a.3 and concave points_mean is v.4_a.3 and
## 133 concavity_mean is v.3_a.11 and concave points_mean is v.4_a.4 and
## 134 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.2 and
## 135 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.3 and
## 136 concavity_mean is v.3_a.15 and concave points_mean is v.4_a.15 and
## 137 concavity_mean is v.3_a.6 and concave points_mean is v.4_a.6 and
## 138 concavity_mean is v.3_a.3 and concave points_mean is v.4_a.2 and
## 139 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.3 and
## 140 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.3 and
## 141 concavity_mean is v.3_a.4 and concave points_mean is v.4_a.5 and
## 142 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.4 and
## 143 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.4 and
## 144 concavity_mean is v.3_a.6 and concave points_mean is v.4_a.7 and
## 145 concavity_mean is v.3_a.2 and concave points_mean is v.4_a.2 and
## 146 concavity_mean is v.3_a.3 and concave points_mean is v.4_a.3 and
## 147 concavity_mean is v.3_a.4 and concave points_mean is v.4_a.3 and
## 148 concavity_mean is v.3_a.11 and concave points_mean is v.4_a.6 and
## 149 concavity_mean is v.3_a.5 and concave points_mean is v.4_a.4 and
## 150 concavity_mean is v.3_a.14 and concave points_mean is v.4_a.6 and
## V18 V19 V20 V21 V22 V23 V24
## 1 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.5
## 2 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.5
## 3 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.14
## 4 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.6
## 5 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.7
## 6 symmetry_mean is v.5_a.8 THEN fractal_dimension_mean is c.6
## 7 symmetry_mean is v.5_a.15 THEN fractal_dimension_mean is c.11
## 8 symmetry_mean is v.5_a.3 THEN fractal_dimension_mean is c.2
## 9 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.10
## 10 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.3
## 11 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.4
## 12 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.6
## 13 symmetry_mean is v.5_a.8 THEN fractal_dimension_mean is c.10
## 14 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.1
## 15 symmetry_mean is v.5_a.3 THEN fractal_dimension_mean is c.6
## 16 symmetry_mean is v.5_a.3 THEN fractal_dimension_mean is c.2
## 17 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.6
## 18 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.7
## 19 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.6
## 20 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.5
## 21 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.3
## 22 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.2
## 23 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.3
## 24 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.6
## 25 symmetry_mean is v.5_a.12 THEN fractal_dimension_mean is c.4
## 26 symmetry_mean is v.5_a.8 THEN fractal_dimension_mean is c.7
## 27 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.3
## 28 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.6
## 29 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.3
## 30 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.4
## 31 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.8
## 32 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.4
## 33 symmetry_mean is v.5_a.1 THEN fractal_dimension_mean is c.5
## 34 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.5
## 35 symmetry_mean is v.5_a.8 THEN fractal_dimension_mean is c.4
## 36 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.4
## 37 symmetry_mean is v.5_a.8 THEN fractal_dimension_mean is c.4
## 38 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.4
## 39 symmetry_mean is v.5_a.9 THEN fractal_dimension_mean is c.5
## 40 symmetry_mean is v.5_a.14 THEN fractal_dimension_mean is c.7
## 41 symmetry_mean is v.5_a.9 THEN fractal_dimension_mean is c.4
## 42 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.2
## 43 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.5
## 44 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.2
## 45 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.3
## 46 symmetry_mean is v.5_a.8 THEN fractal_dimension_mean is c.9
## 47 symmetry_mean is v.5_a.2 THEN fractal_dimension_mean is c.4
## 48 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.1
## 49 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.3
## 50 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.3
## 51 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.4
## 52 symmetry_mean is v.5_a.9 THEN fractal_dimension_mean is c.1
## 53 symmetry_mean is v.5_a.4 THEN fractal_dimension_mean is c.5
## 54 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.4
## 55 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.7
## 56 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.5
## 57 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.3
## 58 symmetry_mean is v.5_a.4 THEN fractal_dimension_mean is c.2
## 59 symmetry_mean is v.5_a.12 THEN fractal_dimension_mean is c.8
## 60 symmetry_mean is v.5_a.8 THEN fractal_dimension_mean is c.6
## 61 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.6
## 62 symmetry_mean is v.5_a.3 THEN fractal_dimension_mean is c.5
## 63 symmetry_mean is v.5_a.11 THEN fractal_dimension_mean is c.9
## 64 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.4
## 65 symmetry_mean is v.5_a.4 THEN fractal_dimension_mean is c.4
## 66 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.6
## 67 symmetry_mean is v.5_a.9 THEN fractal_dimension_mean is c.6
## 68 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.6
## 69 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.8
## 70 symmetry_mean is v.5_a.9 THEN fractal_dimension_mean is c.12
## 71 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.5
## 72 symmetry_mean is v.5_a.9 THEN fractal_dimension_mean is c.5
## 73 symmetry_mean is v.5_a.4 THEN fractal_dimension_mean is c.6
## 74 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.3
## 75 symmetry_mean is v.5_a.3 THEN fractal_dimension_mean is c.4
## 76 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.5
## 77 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.10
## 78 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.5
## 79 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.2
## 80 symmetry_mean is v.5_a.3 THEN fractal_dimension_mean is c.3
## 81 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.5
## 82 symmetry_mean is v.5_a.10 THEN fractal_dimension_mean is c.7
## 83 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.6
## 84 symmetry_mean is v.5_a.4 THEN fractal_dimension_mean is c.5
## 85 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.3
## 86 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.7
## 87 symmetry_mean is v.5_a.4 THEN fractal_dimension_mean is c.8
## 88 symmetry_mean is v.5_a.13 THEN fractal_dimension_mean is c.9
## 89 symmetry_mean is v.5_a.4 THEN fractal_dimension_mean is c.7
## 90 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.3
## 91 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.8
## 92 symmetry_mean is v.5_a.11 THEN fractal_dimension_mean is c.6
## 93 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.8
## 94 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.3
## 95 symmetry_mean is v.5_a.9 THEN fractal_dimension_mean is c.7
## 96 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.3
## 97 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.7
## 98 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.6
## 99 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.5
## 100 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.5
## 101 symmetry_mean is v.5_a.11 THEN fractal_dimension_mean is c.9
## 102 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.4
## 103 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.7
## 104 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.5
## 105 symmetry_mean is v.5_a.9 THEN fractal_dimension_mean is c.6
## 106 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.4
## 107 symmetry_mean is v.5_a.8 THEN fractal_dimension_mean is c.5
## 108 symmetry_mean is v.5_a.4 THEN fractal_dimension_mean is c.2
## 109 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.6
## 110 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.2
## 111 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.6
## 112 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.4
## 113 symmetry_mean is v.5_a.3 THEN fractal_dimension_mean is c.3
## 114 symmetry_mean is v.5_a.3 THEN fractal_dimension_mean is c.3
## 115 symmetry_mean is v.5_a.4 THEN fractal_dimension_mean is c.4
## 116 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.5
## 117 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.4
## 118 symmetry_mean is v.5_a.9 THEN fractal_dimension_mean is c.4
## 119 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.10
## 120 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.7
## 121 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.11
## 122 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.6
## 123 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.5
## 124 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.5
## 125 symmetry_mean is v.5_a.4 THEN fractal_dimension_mean is c.3
## 126 symmetry_mean is v.5_a.2 THEN fractal_dimension_mean is c.7
## 127 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.4
## 128 symmetry_mean is v.5_a.4 THEN fractal_dimension_mean is c.4
## 129 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.5
## 130 symmetry_mean is v.5_a.4 THEN fractal_dimension_mean is c.3
## 131 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.3
## 132 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.6
## 133 symmetry_mean is v.5_a.9 THEN fractal_dimension_mean is c.11
## 134 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.8
## 135 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.4
## 136 symmetry_mean is v.5_a.13 THEN fractal_dimension_mean is c.7
## 137 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.7
## 138 symmetry_mean is v.5_a.4 THEN fractal_dimension_mean is c.6
## 139 symmetry_mean is v.5_a.4 THEN fractal_dimension_mean is c.3
## 140 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.5
## 141 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.6
## 142 symmetry_mean is v.5_a.6 THEN fractal_dimension_mean is c.3
## 143 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.4
## 144 symmetry_mean is v.5_a.8 THEN fractal_dimension_mean is c.3
## 145 symmetry_mean is v.5_a.2 THEN fractal_dimension_mean is c.4
## 146 symmetry_mean is v.5_a.7 THEN fractal_dimension_mean is c.10
## 147 symmetry_mean is v.5_a.2 THEN fractal_dimension_mean is c.8
## 148 symmetry_mean is v.5_a.5 THEN fractal_dimension_mean is c.10
## 149 symmetry_mean is v.5_a.8 THEN fractal_dimension_mean is c.3
## 150 symmetry_mean is v.5_a.12 THEN fractal_dimension_mean is c.15
## Plot the membership functions
plotMF(object.reg)
pred <- predict(object.reg, testing)
## [1] "note: Some of your new data are out of the previously specified range"
## [1] "note: Some of your new data are out of the previously specified range"
str(pred)
## num [1:368, 1] 0.061 0.0535 0.0707 0.0745 0.0625 ...
str(data_research)
## tibble [368 × 2] (S3: tbl_df/tbl/data.frame)
## $ smoothness_mean : num [1:368] 0.0959 0.0897 0.1141 0.1323 0.0997 ...
## $ fractal_dimension_mean: num [1:368] 0.0601 0.0549 0.0623 0.0742 0.0637 ...
data_research$predict <- pred
data_research
## # A tibble: 368 × 3
## smoothness_mean fractal_dimension_mean predict[,1]
## <dbl> <dbl> <dbl>
## 1 0.0959 0.0601 0.0610
## 2 0.0897 0.0549 0.0535
## 3 0.114 0.0623 0.0707
## 4 0.132 0.0742 0.0745
## 5 0.0996 0.0637 0.0625
## 6 0.0888 0.0599 0.0552
## 7 0.109 0.0628 0.0656
## 8 0.0877 0.0522 0.0624
## 9 0.100 0.0731 0.0688
## 10 0.0818 0.0553 0.0566
## # … with 358 more rows
data_research$residual <- (data_research$smoothness_mean-data_research$predict)
data_research
## # A tibble: 368 × 4
## smoothness_mean fractal_dimension_mean predict[,1] residual[,1]
## <dbl> <dbl> <dbl> <dbl>
## 1 0.0959 0.0601 0.0610 0.0348
## 2 0.0897 0.0549 0.0535 0.0362
## 3 0.114 0.0623 0.0707 0.0434
## 4 0.132 0.0742 0.0745 0.0578
## 5 0.0996 0.0637 0.0625 0.0372
## 6 0.0888 0.0599 0.0552 0.0335
## 7 0.109 0.0628 0.0656 0.0433
## 8 0.0877 0.0522 0.0624 0.0253
## 9 0.100 0.0731 0.0688 0.0314
## 10 0.0818 0.0553 0.0566 0.0253
## # … with 358 more rows
mean(data_research$predict != data_research$smoothness_mean)
## [1] 1
accuracy <- table(data_research$predict, data_research$smoothness_mean)
sum(diag(accuracy))/sum(accuracy)
## [1] 0.01358696
library(ggplot2)
library(reshape2)
##
## Attaching package: 'reshape2'
## The following object is masked from 'package:tidyr':
##
## smiths
x <- 1:8
real_data <- data_research$smoothness_mean
predict_data <- data_research$predict
df <- data.frame(x, real_data , predict_data )
# melt the data to a long format
df2 <- melt(data = df, id.vars = "x")
# plot, using the aesthetics argument 'colour'
ggplot(data = df2, aes(x = x, y = value, colour = variable))+
geom_point(alpha = 1/2,size=7) +
theme(legend.justification = "top") +
labs(title = "Graph of Prediction using Fuzzy logic",
subtitle = "Mamdani",
y = "Waktu Pompa", x = "Iterasi") +
theme(axis.text.x = element_text(angle = -45))
