子集数据框由多组指标组成

Question

如果我有这样的数据框：

    x <- data.frame(col1 = rep(2,10),col2 = rep(3,10)
       ,col3 = rep(2,10),col4 = rep(3,10),col5 = rep(2,10)
       ,col6 = rep(3,10),col7 = rep(2,10),col8 = rep(3,10))

    col1 col2 col3 col4 col5 col6 col7 col8
1     2    3    2    3    2    3    2    3
2     2    3    2    3    2    3    2    3
3     2    3    2    3    2    3    2    3
4     2    3    2    3    2    3    2    3
5     2    3    2    3    2    3    2    3
6     2    3    2    3    2    3    2    3

我想获得col 1-4和6-8的列名。 换句话说就是这样：

colnames(x[1:4,6:8])

我该怎么做？

Answer 1

这样做：

$("#first").select2({
  placeholder: 'Select a number range'
});

$("#second").select2({
  placeholder: 'Select a number',
  ajax: {
    url: http://localhost/CodeIgniter/countries/get_state/',
    type: 'POST',
    data: function (params) {
      return {
        id: $("#first").val(),
        search: params.term
      }
    }
  }
});