Question

如何使用＆＃34; R＆＃34;自动提取单个标签。从以下示例文本（.txt）文件转换为excel文件格式，其中excel列将getTag标题如PMID，TI，DP，FAU等，各个值将在此标题下排序???

PMID- 24579777
OWN - NLM
STAT- Publisher
DA  - 20141210
LR  - 20141210
IS  - 1476-8259 (Electronic)
IS  - 1025-5842 (Linking)
VI  - 18
IP  - 11
DP  - 2015 Aug
TI  - A complete structural performance analysis and modelling of hydroxyapatite
      scaffolds with variable porosity.
PG  - 1225-1237
AB  - The use of hydroxyapatite (HA) scaffolds for bone regeneration is an alternative 
      procedure to treat bone defects due to cancer, other diseases or traumas.
      Although the use of HA has been widely studied in the literature, there are still
      some disparities regarding its mechanical performance. This paper presents a
      complete analysis of the structural performance of porous HA scaffolds based on
      experimental tests, numerical simulations and theoretical studies. HA scaffolds
      with variable porosity were considered and fabricated by the water-soluble
      polymer method, using poly vinyl alcohol as pore former. These scaffolds were
      then characterised by scanning electron microscopy, stereo microscopy, X-ray
      diffraction, porosity analysis and mechanical tests. Different scaffold models
      were proposed and analysed by the finite element method to obtain numerical
      predictions of the mechanical properties. Also theoretical predictions based on
      the (Gibson LJ, Ashby MF. 1988. Cellular solids: structure and properties.
      Oxford: Pergamon Press) model were obtained. Finally the experimental, numerical 
      and theoretical results were compared. From this comparison, it was observed that
      the proposed numerical and theoretical models can be used to predict, with
      adequate accuracy, the mechanical performance of HA scaffolds for different
      porosity values.
FAU - Gallegos-Nieto, Enrique
AU  - Gallegos-Nieto E
AD  - a Facultad de Ingenieria, Centro de Investigacion y Estudios de
      Posgrado,Universidad Autonoma de San Luis Potosi , CP 78290 SLP , Mexico.
FAU - Medellin-Castillo, Hugo I
AU  - Medellin-Castillo HI
FAU - de Lange, Dirk F
AU  - de Lange DF
LA  - ENG
PT  - JOURNAL ARTICLE
DEP - 20140228
TA  - Comput Methods Biomech Biomed Engin
JT  - Computer methods in biomechanics and biomedical engineering
JID - 9802899
OTO - NOTNLM
OT  - compressive strength
OT  - finite element method
OT  - hydroxyapatite
OT  - modulus of elasticity
OT  - porosity
OT  - scaffolds
EDAT- 2014/03/04 06:00
MHDA- 2014/03/04 06:00
CRDT- 2014/03/04 06:00
PHST- 2014/02/28 [aheadofprint]
AID - 10.1080/10255842.2014.889690 [doi]
PST - ppublish
SO  - Comput Methods Biomech Biomed Engin. 2015 Aug;18(11):1225-1237. Epub 2014 Feb 28.

Answer 1

如果不写出整个脚本，以下是您可以做的基本知识：

以“ - ”作为分隔符data=read.table('filename',sep="-", row.names=F, col.names=F)
遍历表格中的所有数据（for循环可行，或者您可以使用apply函数）并修剪前导/尾随空格data[i,j]=gsub("^ *",'',data[i,j])，data[i,j]=gsub(" *$",'',data[i,j])
转置数据newData=t(data)
写入Excel电子表格（您也可以使用write.csv，因为它兼容Excel并内置于R）

library(xlsx) write.xlsx(newdata, "c:/mydata.xlsx",col.names=F, row.names=F)

使用R从文本文件中提取文本数据

1 个答案: