R語言分層抽樣的函數是什麼？

從2500個blocks里用分層抽樣抽取10個blocks，應該怎麼編寫代碼？

分層抽樣：

strata(data, stratanames=NULL, size, method=c("srswor","srswr","poisson","systematic"),pik,description=FALSE)

data: 帶抽樣數據

stratanames: 進行分層所依據的變數名稱

size: 各層中要抽出的觀測樣本數

method: 選擇4中抽樣方法，分別為無放回、有放回、泊松、系統抽樣，默認為srswor

pik: 設置各層中樣本的抽樣概率

description: 選擇是否輸出含有各層基本信息的結果

令description = T, 會給出共有多少層，每層中帶抽樣本總數及實際抽取樣本數。