Chọn thư mục làm việc my_folder

path <- "D:/R/my_folder/"
setwd(path)

Xem tên của thư mục đang làm việc với lệnh basename()

#xem tên thư mục đang làm việc
basename(path)

## [1] "my_folder"

Xem đường dẫn đến thư mục đó với lệnh dirname()

#xem đường dẫn đến thư mục đó
dirname(path)

## [1] "D:/R"

Xem danh sách file trong thư mục với lệnh list.files()

#xem danh sach file
list.files()

## [1] "hinh1.JPG" "hinh2.JPG" "hinh3.JPG" "hinh4.JPG" "hinh5.JPG"

Xem danh sách các thư mục con với lệnh list.dirs()

#xem danh sach thu muc
list.dirs()

## [1] "."

Hiện tại chúng ta không có thư mục con nào

Tạo thư mục mới với lệnh dir.create()

#Tao thu muc moi
dir.create("new_folder")

Kiểm tra lại với lệnh list.dirs()

list.dirs()

## [1] "."            "./new_folder"

Kiểm tra xem thư mục có tồn tại hay không với lệnh dir.exists()

#kiem tra thu muc co ton tai hay khong
dir.exists("new_folder")

## [1] TRUE

Xem đồng thời cả tập tin và thư mục con trong thư mục với lệnh dir()

#xem dong thoi file va folder trong thu muc
dir(path)

## [1] "hinh1.JPG"  "hinh2.JPG"  "hinh3.JPG"  "hinh4.JPG"  "hinh5.JPG" 
## [6] "new_folder"

Copy tập tin với lệnh file.copy()

#copy tập tin
file.copy(from="hinh1.JPG",to="new_folder/hinh1.JPG")

## [1] TRUE

Kiểm tra

dir("new_folder/")

## [1] "hinh1.JPG"

Rename tập tin với lệnh file.rename()

file.rename("new_folder/hinh1.JPG","new_folder/hinh2.JPG")

## [1] TRUE

Kiểm tra

dir("new_folder")

## [1] "hinh2.JPG"

Remove tập tin với lệnh file.remove()

file.remove("new_folder/hinh2.JPG")

## [1] TRUE

Kiểm tra

dir("new_folder/")

## character(0)

Copy nguyên thư mục với lệnh file.copy()

Tạo thư mục mới my_new_folder

dir.create("D:/R/my_new_folder")

Copy thư mục my_folder vào thư mục my_folder2 với lênh file.copy và tham số recursive=TRUE

file.copy("D:/R/my_folder", "D:/R/my_new_folder", recursive=TRUE)

## [1] TRUE

Kiểm tra

dir("D:/R/my_new_folder")

## [1] "my_folder"