Следующий код на самом деле работает:
df <- read.table(header = T, text = " Saris/Palis SznYr HUC4
1 1100500 2003-Winter 202
2 1100500 2017-Fall 202
3 1100500 2017-Summer 202
4 1100525 2006-Winter 202
5 1100525 2016-Winter 202
1200 5131700 2012-Summer 109
1201 5131700 2015-Fall 109
1202 5131700 2015-Spring 109
1203 5131700 2016-Winter 109
1204 5131775 2007-Spring 109
1205 5131780 2006-Winter 109
800 3522425 2007-Spring 108
801 3522450 2006-Spring 108
802 3522450 2007-Fall 108
803 3522450 2007-Summer 108
804 3522450 2011-Summer 108
805 3522450 2012-Spring 108")
split(df, df$HUC4)
# $`108`
# Saris.Palis SznYr HUC4
# 800 3522425 2007-Spring 108
# 801 3522450 2006-Spring 108
# 802 3522450 2007-Fall 108
# 803 3522450 2007-Summer 108
# 804 3522450 2011-Summer 108
# 805 3522450 2012-Spring 108
#
# $`109`
# Saris.Palis SznYr HUC4
# 1200 5131700 2012-Summer 109
# 1201 5131700 2015-Fall 109
# 1202 5131700 2015-Spring 109
# 1203 5131700 2016-Winter 109
# 1204 5131775 2007-Spring 109
# 1205 5131780 2006-Winter 109
#
# $`202`
# Saris.Palis SznYr HUC4
# 1 1100500 2003-Winter 202
# 2 1100500 2017-Fall 202
# 3 1100500 2017-Summer 202
# 4 1100525 2006-Winter 202
# 5 1100525 2016-Winter 202
Так что я думаю, что у вашего фрейма данных есть структурные проблемы.
Можете ли вы опубликовать str(df)
?