1 Giới thiệu

Dạo qua các cuộc thi trên Kaggle Competition hiện nay ta có thể thấy một trong những thuật toán đang được sử dụng nhiều nhất và có thể coi là công thức để chiến thắng đó chính là Lightgbm. Tuy nhiên, việc cài đặt package Lightgbm trải qua khá nhiều bước rất phức tạp khác với cách cài đặt bằng install.package thông thường.

Trong bài viết này, mình sẽ hướng dẫn các bạn cách cài đặt Lightgbm trên R

2 Các bước cài đặt

2.1 Bước 1: Cần cài đặt CMake

2.2 Bước 2: Cần cài đặt Rtools

2.3 Bước 3: Add PATH

Trên thanh Search Window gõ tìm kiếm Advanced system setting >> Enviroment Variables >> double click vào PATH >> New >> Add thêm đường dẫn của Rtools và CMake:

C:\Rtools\bin
C:\Rtools\mingw_64\bin
C:\Program Files\CMake\bin\cmake

2.4 Bước 4: Cài đặt R phiên bản lớn hơn 3.5

Lưu ý khi cài đặt ta chỉ được cài đặt phiên bản R 64-bit

2.5 Bước 5: Cài đặt Lightgbm

Download thư mục từ Lightgbm github
Open file: build_r.R và sửa 1 chút đường dẫn đến thư mục library và thư mục chứa file github của bạn. Như mình đang để file download từ github về tại Destop và library đang để ở Rlibrary

library(testthat)
library(roxygen2)
library(devtools)

.handle_result <- function(res) {
  if (!res) {
    stop("Copying files failed!")
  }
}

unlink(x = "D:/Rlibrary/lightgbm_r", recursive = TRUE)
dir.create("D:/Rlibrary/lightgbm_r")

result <- file.copy(from = "C:/Users/thanhnm3/Desktop/R-package/./",
                    to = "D:/Rlibrary/lightgbm_r/",
                    recursive = TRUE,
                    overwrite = TRUE)
.handle_result(result)

result <- file.copy(from = "C:/Users/thanhnm3/Desktop/include/",
                    to = file.path("D:/Rlibrary/lightgbm_r", "src/"),
                    recursive = TRUE,
                    overwrite = TRUE)
.handle_result(result)

result <- file.copy(from = "C:/Users/thanhnm3/Desktop/src/",
                    to = file.path("D:/Rlibrary/lightgbm_r", "src/"),
                    recursive = TRUE,
                    overwrite = TRUE)
.handle_result(result)

result <- file.copy(from = "C:/Users/thanhnm3/Desktop/CMakeLists.txt",
                    to = file.path("D:/Rlibrary/lightgbm_r", "inst", "bin/"),
                    overwrite = TRUE)
.handle_result(result)

devtools::build(pkg = "D:/Rlibrary/lightgbm_r",
                args = c("--keep-empty-dirs"))

version <- gsub(
  "Version: ",
  "",
  grep(
    "Version: ",
    readLines(con = file.path("D:/Rlibrary/lightgbm_r", "DESCRIPTION")),
    value = TRUE
  )
)
tarball <- file.path("D:/Rlibrary/", sprintf("lightgbm_%s.tar.gz", version))

system(sprintf("R CMD INSTALL %s --no-multiarch", tarball))

Set up lightgbm in R

Advanced Analytics BICC - Nguyen Minh Thanh

06/12/2018