ฉันมีชื่อไฟล์ด้านล่าง:
structure(
list(ID = c("P-1", " P-1", "P-1", "P-2", "P-3", "P-4", "P-5", "P-6", "P-7",
"P-8"),
Date = c("2020-03-16 12:11:33", "2020-03-16 13:16:04",
"2020-03-16 06:13:55", "2020-03-16 10:03:43",
"2020-03-16 12:37:09", "2020-03-16 06:40:24",
"2020-03-16 09:46:45", "2020-03-16 12:07:44",
"2020-03-16 14:09:51", "2020-03-16 09:19:23"),
Status = c("SA", "SA", "SA", "RE", "RE", "RE", "RE", "XA", "XA", "XA"),
Flag = c("L", "L", "L", NA, "K", "J", NA, NA, "H", "G"),
Value = c(5929.81, 5929.81, 5929.81, NA, 6969.33, 740.08, NA, NA, 1524.8,
NA),
Flag2 = c("CL", "CL", "CL", NA, "RY", "", NA, NA, "", NA),
Flag3 = c(NA, NA, NA, NA, "RI", "PO", NA, "SS", "DDP", NA)),
.Names=c("ID", "Date", "Status", "Flag", "Value", "Flag2", "Flag3"),
row.names=c(NA, 10L), class="data.frame")
ฉันกำลังใช้รหัสที่กล่าวถึงด้านล่าง:
df %>% mutate(L = ifelse(Flag == "L",1,0),
K = ifelse(Flag == "K",1,0),
# etc for Flag) %>%
mutate(sub_status = NA) %>%
mutate(sub_status = ifelse(!is.na(Flag2) & Flag3 == 0, "a", sub_status),
sub_status = ifelse(is.na(Flag2) & Flag3 != 0, "b", sub_status),
# etc for sub-status) %>%
mutate(value_class = ifelse(0 <= Value & Value <= 15000, "0-15000",
"15000-50000")) %>%
group_by(Date, status, sub_status, value_class) %>%
summarise(L = sum(L),
K = sum(K),
# etc
count = n())
ซึ่งให้ฉันผลลัพธ์ต่อไปนี้:
Date Status sub_status value_class G H I J K L NA Count
2020-03-20 SA a 0-15000 0 0 0 0 1 1 0 2
2020-03-20 SA b 0-15000 0 0 0 0 1 0 0 1
................
................
ฉันต้องการที่จะได้รับการส่งออกต่อไปโดยใช้DF
ที่Status
คอลัมน์มีที่แตกต่างกัน 3 ค่านิยมและFlag2
มีค่าอย่างใดอย่างหนึ่งหรือ [null] หรือ NA และในที่สุดก็Flag3
คอลัมน์มีที่แตกต่างกัน 7 ค่ากับ [null] หรือ NA สำหรับหนึ่งที่แตกต่างID
เรามีหลายรายการของFlag3
คอลัมน์
ฉันต้องการสร้าง dataframe ต่อไปนี้โดยการสร้าง 3 กลุ่มตามValue
เช่น 0-15000, 15000-50000
- หากมีรหัสที่แตกต่างกัน
Flag2
มีค่าอื่นที่ไม่ใช่ 0 หรือ [null] / NA บางส่วน แต่Flag3
มีค่า 0 หรือ [null] / NAa
แล้วมันจะเป็น - ถ้าสำหรับ ID ที่แตกต่าง
Flag3
มีค่าอื่นนอกเหนือจาก 0 หรือ [null] / NA แต่Flag2
มีค่า 0 หรือ [null] / NA ก็จะเป็นb
- ถ้าสำหรับ ID ที่แตกต่างกันทั้งสอง
Flag2
&Flag3
มีค่าอื่นที่ไม่ใช่ 0 หรือ [Null] / NA ก็จะเป็นเช่นนั้นc
- หากทั้ง ID ที่แตกต่างกัน
Flag2
และFlag3
มีค่าเป็น 0 หรือ [Null] / NA จะเป็นเช่นนั้นd
ฉันต้องการจัดเรียง datafrmae ที่กล่าวถึงข้างต้นในโครงสร้างต่อไปนี้ด้วยpercent
และTotal
คอลัมน์
ผมได้กล่าวถึงร้อยละเช่น2/5
เพื่อแสดงสถานะที่จะถูกแบ่งออกโดยรวมในขณะที่จะถูกหารด้วยตนsub_status
Status
16/03/2020 0 - 15000 15000 - 50000
Status count percent L K J H G [Null] count percent L K J H G [Null] Total
SA 1 1/8 (12.50%) 1 0 0 0 0 0 0 - 0 0 0 0 0 0 1
a 1 1/1(100.00%) 1 0 0 0 0 0 0 - 0 0 0 0 0 0 1
b 0 - 0 0 0 0 0 0 0 - 0 0 0 0 0 0 0
c 0 - 1 0 0 0 0 0 0 - 0 0 0 0 0 0 0
d 0 - 0 0 0 0 0 0 0 - 0 0 0 0 0 0 0
RE 4 50.00% 0 1 1 0 0 2 0 - 0 0 0 0 0 0 4
a 0 - 0 0 0 0 0 0 0 - 0 0 0 0 0 0 0
b 1 25.00% 0 0 1 0 0 1 0 - 0 0 0 0 0 0 1
c 1 25.00% 0 1 0 0 0 1 0 - 0 0 0 0 0 0 1
d 2 50.00% 0 0 0 0 0 2 0 - 0 0 0 0 0 0 2
XA 3 37.50% 0 0 0 1 1 1 0 - 0 0 0 0 0 0 3
a 0 - 0 0 0 0 0 0 0 - 0 0 0 0 0 0 0
b 2 66.67% 0 0 0 1 0 1 0 - 0 0 0 0 0 0 2
c 0 - 0 0 0 0 0 0 0 - 0 0 0 0 0 0 0
d 1 33.33% 0 0 0 0 1 0 0 - 0 0 0 0 0 0 1
Total 8 100.00% 1 1 0 0 1 3 0 - 0 0 0 0 0 0 8
ฉันได้กล่าวถึงการส่งออกที่จำเป็นขึ้นอยู่กับวันที่ล่าสุดซึ่งเป็น 16/03/2020 ถ้า dataframe ไม่มีวันที่ล่าสุดตามstartdate
เก็บค่าทั้งหมด 0 ใน dataframe เอาท์พุท คอลัมน์เปอร์เซ็นต์ใช้สำหรับการอ้างอิงเท่านั้นซึ่งจะมีการคำนวณค่าเปอร์เซ็นต์
นอกจากนี้ฉันต้องการให้โครงสร้างคงที่ ตัวอย่างเช่นหากพารามิเตอร์ใด ๆ ไม่มีอยู่ในวันโครงสร้างเอาต์พุตจะเหมือนกันกับค่า 0
ตัวอย่างเช่นสมมติว่าวันที่17/03/2020
ไม่ได้มีแถวใด ๆ กับสถานะSA
หรือ sub_status เจ้าของสถานที่สำหรับการที่จะมีในการส่งออกมีมูลค่าเป็นc
0
dput
ชุดข้อมูลที่คุณชอบ - มันคือบล็อกรหัสที่สาม รหัสก่อนหน้านี้ไม่ปรากฏขึ้นเนื่องจากคุณดูเนื้อหาที่มีผลลัพธ์
2/5
เพียงเพื่อวัตถุประสงค์ในการเป็นตัวแทน จะมีค่าร้อยละเฉพาะกับทศนิยม 2 ตำแหน่งที่มีเครื่องหมายเปอร์เซ็นต์