我有一根这样的线
response <- "q1=2,q2=3,q3=4,q4=5,q5=0,q6=4,q7=6,q31=3,q32=5,q33=5,q34=1,q35=3,q36=6,q37=4,q38=3,q39=5,q40=5,q41=1,q42=5,q43=4,q44=3,q45=5,q46=6,q47=0,q48=4,q49=2,q50=4,q51=6,q52=5,q53=4,q8=3,q9=0,q10=2,q11=4,q12=6,q13=5,q54=1,q55=2,q56=3,q57=1,q58=2,q59=3,q60=0,q61=1,q14=2,q15=4,q16=6,q62=3,q63=2,q64=2,q65=5,q66=6,q17=3,q18=3,q19=1,q20=4,q21=6,q67=1,q68=2,q69=2,q70=4,q71=4,q72=5,q73=6,q74=5,q75=4,q76=3,q77=2,q78=1,q79=0,q80=2,q81=6,q82=5,q83=4,q84=5,q22=2,q23=4,q24=5,q25=1,q26=2,q85=1,q86=0,q87=2,q88=5,q89=3,q90=6,q91=1,q92=0,q93=5,q94=4,q95=3,q96=1,q97=2,q98=3,q99=4,q100=4,q101=5,q102=6,q103=2,q104=1,q105=4,q106=3,q107=2,q108=1,q109=6,q110=0,q111=4,q112=5,q113=4,q114=3,q115=5,q116=4,q117=6,q118=0,q119=3,q120=4,q121=2,q122=4,q123=3,q124=5,q125=6,q126=4,q127=3,q128=4,q129=5,q130=6,q131=4,q27=5,q28=3,q29=6,q30=5,q132=1,q133=0,q134=3,q135=4,q136=6,q137=2,q138=1,q139=5"
我想以这样一种方式转换它:任何在=Sign之前的内容都会变成列标题，任何在后面的内容都会变成列值.如果我这样做，我会得到什么
df <- data.frame('key'='value','key2'='value2')
我怎么能用那样的绳子来做这件事呢？
请原谅我的无知，我正在与这个问题作斗争，在R中找不到答案.