NHIỆM VỤ 5

---

NHIỆM VỤ 5 BẢNG PHÂN TÍCH VỀ TÌNH HÌNH SẢN XUẤT NÔNG NGHIỆP CỦA ẤN ĐỘ

---

MỤC TIÊU PHÂN TÍCH

Phân tích tình hình sản xuất nông nghiệp ở Ấn Độ đòi hỏi sự chú ý đến một số mục tiêu quan trọng để hiểu rõ về thị trường nông nghiệp của quốc gia này. Dưới đây là một số mục tiêu quan trọng cần chú ý:

• Đánh giá mức độ hiệu quả của sản xuất nông nghiệp

• Nghiên cứu về sự ảnh hưởng của các yếu tố như thời tiết, chất dinh dưỡng đất, và kỹ thuật canh tác đối với năng suất. Nghiên cứu sự phân bố đất đai ở Ấn Độ, cũng như đánh giá hiệu quả sử dụng đất đai trong nông nghiệp.

• Xem xét ảnh hưởng của nông nghiệp đối với môi trường và phát triển các biện pháp bảo vệ môi trường trong sản xuất nông nghiệp.

PHƯƠNG PHÁP NGHIÊN CỨU

Sử dụng các phương pháp thống kê mô tả dữ liệu:

• Rút trích dữ liệu

• Mã hóa dữ liệu

• Lập bảng tần số

• Tính toán các đặc trưng đo lường

• Nhận xét kết quả

BỘ DỮ LIỆU

Bộ dữ liệu về tình hình nông nghiệp của Ấn Độ trong những năm cuối TK 19 đến nay. Dữ liệu được tải về từ Dataset Search

1. Tổng quan về nông nghiệp Ấn Độ

Nằm ở khu vực Tây Nam Á, Ấn Độ có diện tích tự nhiên gần 33 triệu km2, trong đó, diện tích đất nông nghiệp là 141,23 triệu ha với dân số trên 1 tỉ người, có truyền thống văn hóa, lịch sử lâu đời và thế mạnh về phát triển nông nghiệp. Lục địa này có những đồng bằng rộng lớn mà không một quốc gia nào trên thế giới có được. Chỉ riêng đồng bằng Ấn - Hằng, diện tích khoảng 775.000 km2 (gấp 2,3 lần diện tích Việt Nam) với điều kiện tự nhiên thuận lợi đã tạo nên vùng kinh tế trù phú.

Sau đây là dữ liệu về nền nông nghiệp của Ấn Độ đã được tải về

library(csv)
nt <- read.csv(file= 'C:/Users/Admin/Downloads/India Agriculture Crop Production.csv')
nt <- nt[nt$State=='Andaman and Nicobar Islands' | nt$State=='Uttarakhand' | nt$State=='West Bengal' | nt$State=='Uttarakhand'  , ]

Bảng dữ liệu cho ta biết các thông tin sau:

• State: Bang ở Ấn Độ
• DiDistrict: tên một thị xã, thị trấn hay thành phố… thuộc bang nào đó ở Ấn Độ
• Crop: tên nông sản sản xuất
• Year: năm phân tích
• Season: mùa vụ
• Area: diện tích trồng trọt, sản xuất
• Area.Units: đơn vị diện tích trồng trọt sản xuất (hectare)
• Production: sản lượng
• Production.Units: đơn vị sản lượng (tấn)
• Yiels: năng suất

VẼ BIỂU ĐỒ

1. Nông sản

Ngành nông nghiệp là nguồn sinh kế chính của khoảng 58% dân số Ấn Độ. Mặc dù đóng góp của nó vào tổng sản phẩm quốc nội (GDP) đã giảm xuống dưới 20% và đóng góp của các ngành khác tăng với tốc độ nhanh hơn.

Do đó các loại nông sản Ấn Độ đa dạng và phong phú với nhiều loại khác nhau điển hình là gạo, gừng, khoai tây, ragi…

nt1 <- nt[nt$Crop=='Rice' | nt$Crop=='Sugarcane' | nt$Crop=='Ragi' | nt$Crop=='Wheat' | nt$Crop=='Potato' | nt$Crop=='Ginger', ]

library(ggplot2)

## Warning: package 'ggplot2' was built under R version 4.3.3

library(scales)
library(tidyverse)

## ── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ──
## ✔ dplyr     1.1.4     ✔ readr     2.1.5
## ✔ forcats   1.0.0     ✔ stringr   1.5.1
## ✔ lubridate 1.9.3     ✔ tibble    3.2.1
## ✔ purrr     1.0.2     ✔ tidyr     1.3.0
## ── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
## ✖ readr::col_factor() masks scales::col_factor()
## ✖ purrr::discard()    masks scales::discard()
## ✖ dplyr::filter()     masks stats::filter()
## ✖ dplyr::lag()        masks stats::lag()
## ℹ Use the conflicted package (<http://conflicted.r-lib.org/>) to force all conflicts to become errors

nt1 %>% group_by(Crop) %>% summarise(m= n()) %>% ggplot(aes(x = Crop, y = m )) + 
  geom_col(fill='pink') + 
  labs(x = 'Nông sản ', y = 'N')

Qua biểu đồ tổng hợp các loại nông sản phổ biến trong đó gạo vẫn là loại nông sản đc trồng nhiều nhất ở Ấn Độ

nt1 %>% group_by(Crop) %>% summarise(n = n()) %>%
  ggplot(aes(x = '', y = n,fill = Crop)) +
  geom_col() +
  geom_text(aes(x = 1.3, label = n),position = position_stack(vjust = .5)) +
  coord_polar('y')

nt1 %>% group_by(Crop) %>% summarise(n = mean(Yield)) %>% 
  ggplot(aes(x = '', y = n,fill = Crop)) + 
  geom_col( color = 'black' ) + 
  geom_text(aes(label = n),position = position_stack(vjust = 1)) +
  labs( y = 'Năng suất TB') 

Qua biểu đồ trên ta có thể thấy: Năng suất gạo ở Ấn Độ có thể được coi là đáng chú ý so với nhiều loại nông sản khác. Ấn Độ là một trong những nhà sản xuất gạo lớn nhất thế giới và gạo là một phần quan trọng của chế độ ăn uống của người dân ở đây.

2. Sản lượng

Đối với đất nước có nền nông nghiệp là chủ yếu như Ấn Độ thì sản lượng nông sản hằng năm là vấn đề cần quan tâm nhất. Sản lượng nông sản của Ấn Độ đã có sự biến động trong những năm qua do ảnh hưởng của nhiều yếu tố khác nhau như thời tiết, chính sách nông nghiệp, công nghệ, và biến động thị trường.

nt1 %>% na.omit() %>% ggplot(aes(x = Production , y = Area  , color = Crop )) +
  geom_point()

library(gganimate)

## Warning: package 'gganimate' was built under R version 4.3.3

library(magick)

## Warning: package 'magick' was built under R version 4.3.3

## Linking to ImageMagick 6.9.12.98
## Enabled features: cairo, freetype, fftw, ghostscript, heic, lcms, pango, raw, rsvg, webp
## Disabled features: fontconfig, x11

nt1 %>% 
  na.omit() %>% 
  ggplot(aes(x = Area, y = Production, color = Crop)) +
  geom_line() +
  geom_point(size=2)

Qua biểu đồ ta thấy được sự thay đổi sản lượng từng thời kì thông qua các yếu tố các nhau

nt3 <- nt1 %>% group_by(State, Crop) %>% summarise(n = n(), .groups='drop')
nt3 %>% ggplot(aes(x = State , y = n)) +
  geom_col(data = nt3 %>% filter(Crop=='Rice'), fill = 'yellow') +
  geom_col(data = nt3 %>% filter(Crop=='Ginger'), fill = 'black')

3. Diện tích

Diện tích đất nông nghiệp của Ấn Độ rộng lớn và đa dạng, cung cấp cơ sở quan trọng cho sản xuất nông nghiệp. Đất nông nghiệp của nước này được sử dụng để trồng nhiều loại cây trồng khác nhau, từ lúa gạo đến đậu và mía. Điều này đóng vai trò quan trọng trong đảm bảo an sinh xã hội và kinh tế của hàng triệu người dân.

nt1 %>% group_by(Crop) %>% summarise(n= sum(Area))%>% ggplot( aes(x = Crop, y= n )) + geom_col (fill='red') + labs(x= 'Nông sản', y= 'diện tích' )

Ấn Độ có một trong những diện tích canh tác gạo lớn nhất thế giới, với hơn 40 triệu hecta đất được dành cho gieo trồng gạo. Tuy nhiên, mặc dù diện tích này lớn, hiệu suất canh tác vẫn còn thấp so với nhiều quốc gia khác.

nt1 %>% na.omit() %>% ggplot( aes( x= Area  , y = Production , color = Crop )) + 
  geom_point(size = 1,alpha = 0.5) +  
  geom_smooth( method = "lm", size = 2)                 

## Warning: Using `size` aesthetic for lines was deprecated in ggplot2 3.4.0.
## ℹ Please use `linewidth` instead.
## This warning is displayed once every 8 hours.
## Call `lifecycle::last_lifecycle_warnings()` to see where this warning was
## generated.

## `geom_smooth()` using formula = 'y ~ x'

nt1 %>% group_by(State) %>% summarise(n= mean(Area)) %>% 
   ggplot(aes(x = State, y = n)) + 
  geom_col(fill = 'yellow')+
  labs(x= ' Khu vực', y= 'Diện tích')

Với ba khu vực được coi là có diện tích đất nông nghiệp cao nhất Ấn Độ là West Bengal, Andaman and Nicobar Islands, Uttarakhand ta thấy diện tích trung bình giữa các khu vực có sự chênh lệch rất lớn đặc biệt là vùng Wesst Bengal có diện tích trung bình mỗi quận lên tới 50000 hecta.

4. Năng suất

Năng suất gạo ở Ấn Độ là một chủ đề rất quan trọng và phức tạp, vì nó ảnh hưởng đến nền kinh tế, an ninh lương thực và cuộc sống hàng ngày của hàng triệu người dân.

nt1 %>% na.omit() %>% ggplot(aes(y = Yield , x = State , fill = Crop)) + 
  geom_boxplot()+                     
  theme(legend.position = "none")

nt1 %>% na.omit() %>% ggplot(aes(y = Yield, x = State, color = State))+                     
  geom_jitter()

nt1 %>% na.omit() %>% ggplot(aes(y = Yield, x = State, color = State))+                     
  geom_violin()

Ba biểu đồ trên thể hiện sự thay đổi của năng suất nông sản Ấn Độ theo từng khu vực khác nhau: nhìn biểu đồ ta thấy rõ khu vực West Bengal có năng suất gạo lớn nhất và như gấp đôi hai khu vực còn lại.

5. MÙA VỤ

Ấn Độ là một trong những quốc gia có hệ thống mùa vụ phong phú và đa dạng nhất trên thế giới, với sự biến đổi của khí hậu và địa hình ảnh hưởng đến việc trồng trọt và sản xuất nông sản. Mỗi mùa vụ đều mang lại các cơ hội và thách thức riêng, và nó đóng vai trò quan trọng trong đảm bảo an ninh lương thực của quốc gia. Sự thành công của các mùa vụ này không chỉ phụ thuộc vào yếu tố tự nhiên mà còn phụ thuộc vào các biện pháp quản lý nông nghiệp và chính sách hỗ trợ từ chính phủ.

nt2 <- nt1 %>%  group_by(nt1$Season) %>% summarise(n=n())
hist(nt2$n, main="Phân Phối Mùa Vụ" , xlab="Mùa Vụ ", col="orange", border="black")