ฉันกำลังพยายามลดเครือข่ายขนาดใหญ่ให้เหลือเพียง 5% แรกของ Edge ซึ่งพิจารณาจากน้ำหนักของ Edge
ฉันมักจะตัดทอนเครือข่ายของฉันโดยประกาศจุดตัดสำหรับน้ำหนักขอบดังนี้:
g2 <- delete.edges(g1, E(g1) [weight<20])
มีวิธีลบขอบด้านล่าง 95% ตามน้ำหนักหรือไม่ เช่น:
g2 <- delete.edges(g1, E(g1) [weight outside the top 5%])
หรือจะแยก 5% อันดับแรกออกมาเป็นอย่างอื่น?
quantile()
เพื่อคำนวณควอนไทล์ 5% (ค่าที่แบ่งออกเป็น 5% และ 95%) แล้วใช้เป็นจุดตัด - person Rcoster   schedule 29.04.2013