Вызовите несколько переменных из одного файла .txt в R Shiny

#r #shiny

Вопрос:

Я относительно новичок в R и работаю над приложением R Shiny, разработанным моим предшественником.

Я надеюсь, что смогу добавить несколько чисел в конец текущей строки кода, чтобы одновременно вызывать несколько переменных из одного файла .txt. Текущая строка кода является:

 i <- as.numeric(input$zoneProject)   3
 

Это вызывает номер в файле .txt плюс 3. Значения zoneProject выбираются пользователем и находятся в диапазоне от 1 до 18. Первые 3 файла, перечисленные в примере файла .txt ниже, на данный момент не имеют отношения к приложению, поэтому, добавив » 3″, он пропускает первые 3. Таким образом, если бы была выбрана область 1, это было бы 1 3, что дает значение 4, поэтому растр, связанный с номером 4 в the.txt файл будет выбран.

В файле .txt, связанном с каждой зоной, перечислены 11 растров, поэтому я надеюсь, что смогу вызвать все растры, связанные с каждой отдельной зоной одновременно. Таким образом, чтобы вызвать растры для зоны 1 на примере изображения файла .txt, это будет 3 и 21

 Number|File|Name|Description    
1|n_1_forest.tif|lca_pres|LCA Present
2|hard_con1.tif|hard_con1|Areas with water, rock, littoral, mountain or urban land use
3|Nopeat.tif|non_peat_soils|non peat soils
4|All_Constraints_1.tif|All_Constraints_1|All Constraints for zone 1
5|All_Constraints_2.tif|All_Constraints_2|All Constraints for zone 2
6|All_Constraints_3.tif|All_Constraints_3|All Constraints for zone 3
7|All_Constraints_4.tif|All_Constraints_4|All Constraints for zone 4
8|All_Constraints_5.tif|All_Constraints_5|All Constraints for zone 5
9|All_Constraints_6.tif|All_Constraints_6|All Constraints for zone 6
10|All_Constraints_7.tif|All_Constraints_1|All Constraints for zone 7
11|All_Constraints_8.tif|All_Constraints_8|All Constraints for zone 8
12|All_Constraints_9.tif|All_Constraints_9|All Constraints for zone 9
13|All_Constraints_10.tif|All_Constraints_10|All Constraints for zone 10
14|All_Constraints_11.tif|All_Constraints_11|All Constraints for zone 11
15|All_Constraints_12.tif|All_Constraints_12|All Constraints for zone 12
16|All_Constraints_13.tif|All_Constraints_13|All Constraints for zone 13
17|All_Constraints_14.tif|All_Constraints_14|All Constraints for zone 14
18|All_Constraints_15.tif|All_Constraints_15|All Constraints for zone 15
19|All_Constraints_16.tif|All_Constraints_16|All Constraints for zone 16
20|All_Constraints_17.tif|All_Constraints_17|All Constraints for zone 17
21|All_Constraints_18.tif|All_Constraints_18|All Constraints for zone 18
22|dams24_100m_1.tif|dams24_100m_1|dams24_100m for zone 1
23|dams24_100m_2.tif|dams24_100m_2|dams24_100m for zone 2
24|dams24_100m_3.tif|dams24_100m_3|dams24_100m for zone 3
25|dams24_100m_4.tif|dams24_100m_4|dams24_100m for zone 4
26|dams24_100m_5.tif|dams24_100m_5|dams24_100m for zone 5
27|dams24_100m_6.tif|dams24_100m_6|dam
 

Размер файла .txt увеличивается до 183.

Я надеюсь позвонить сразу по нескольким номерам из документа .txt, но не уверен, как записать это в исходный код. Я уверен, что это базовые знания R, однако до сих пор мне не удавалось заставить их работать. Любая помощь или идеи будут высоко оценены, спасибо!