[Rqda-commits] r59 - pkg pkg/R www
noreply at r-forge.r-project.org
noreply at r-forge.r-project.org
Tue Mar 10 18:44:39 CET 2009
Author: wincent
Date: 2009-03-10 18:44:36 +0100 (Tue, 10 Mar 2009)
New Revision: 59
Added:
pkg/CITATION
Removed:
pkg/inst/
Modified:
pkg/ChangeLog
pkg/NAMESPACE
pkg/R/FileButton.R
www/ChangeLog.txt
www/documentation.html
www/index.html
Log:
Added: pkg/CITATION
===================================================================
--- pkg/CITATION (rev 0)
+++ pkg/CITATION 2009-03-10 17:44:36 UTC (rev 59)
@@ -0,0 +1,10 @@
+To cite package 'RQDA' in publications use:
+
+Huang Ronggui. 2008. RQDA: R-based Qualitative Data Analysis. R package version 0.1-6.http://rqda.r-forge.r-project.org/.
+
+ at Manual{RQDA_rgHUANG,
+ title = {RQDA: R-based Qualitative Data Analysis},
+ author = {Ronggui HUANG},
+ year = {2008},
+ url = {http://rqda.r-forge.r-project.org/}
+}
\ No newline at end of file
Modified: pkg/ChangeLog
===================================================================
--- pkg/ChangeLog 2009-01-09 14:46:29 UTC (rev 58)
+++ pkg/ChangeLog 2009-03-10 17:44:36 UTC (rev 59)
@@ -1,3 +1,9 @@
+2009-03-11
+ * New function of AddNewFileFun, add to popup menu of file Tab.
+
+2009-01-14
+ * Add citation file.
+
2009-01-09
* Add namespace
* RQDA-internal.rd is no loner needed (can be found in rev 57 or version 0.1-6)
Modified: pkg/NAMESPACE
===================================================================
--- pkg/NAMESPACE 2009-01-09 14:46:29 UTC (rev 58)
+++ pkg/NAMESPACE 2009-03-10 17:44:36 UTC (rev 59)
@@ -1,3 +1,5 @@
-export(CleanProject,CrossCode,CrossTwo,GetCodingTable,GetFileId,list.deleted,pdelete,relation,RQDA,SearchFiles,SummaryCoding)
+export(CleanProject,CrossCode,CrossTwo,GetCodingTable,GetFileId,
+ list.deleted,pdelete,relation,RQDA,
+ SearchFiles,SummaryCoding,write.FileList)
S3method(print,SummaryCoding)
import(RGtk2)
Modified: pkg/R/FileButton.R
===================================================================
--- pkg/R/FileButton.R 2009-01-09 14:46:29 UTC (rev 58)
+++ pkg/R/FileButton.R 2009-03-10 17:44:36 UTC (rev 59)
@@ -152,16 +152,51 @@
}
+AddNewFileFun <- function(){
+ if (is_projOpen(env=.rqda,"qdacon")) {
+ tryCatch(eval(parse(text="dispose(.rqda$.AddNewFileWidget")),error=function(e) {}) ## close the widget if open
+ assign(".AddNewFileWidget",gwindow(title="Add New File.",parent=c(395,10),width=600,height=400),env=.rqda)
+ assign(".AddNewFileWidget2",gpanedgroup(horizontal = FALSE, con=get(".AddNewFileWidget",env=.rqda)),env=.rqda)
+ gbutton("Save To Project",con=get(".AddNewFileWidget2",env=.rqda),handler=function(h,...){
+ ## require a title for the file
+ Ftitle <- ginput("Enter the title", icon="info")
+ if (Ftitle!="") {Encoding(Ftitle) <- "UTF-8"}
+ if (nrow(dbGetQuery(.rqda$qdacon,sprintf("select name from source where name=='%s'",Ftitle)))!=0) {
+ Ftitle <- paste("New",Ftitle)
+ }## Make sure it is unique
+ content <- svalue(textW)
+ content <- enc(content) ## take care of double quote.
+ maxid <- dbGetQuery(.rqda$qdacon,"select max(id) from source")[[1]] ## the current one
+ nextid <- ifelse(is.na(maxid),0+1, maxid+1) ## the new one/ for the new file
+ ans <- dbGetQuery(.rqda$qdacon,sprintf("insert into source (name, file, id, status,date,owner )
+ values ('%s', '%s',%i, %i, '%s', '%s')",
+ Ftitle,content, nextid, 1,date(),.rqda$owner))
+ ## write to the data-base ## what is ans?
+ ## rm(.AddNewFileWidget,.AddNewFileWidget2,env=.rqda)
+ ## delete .rqda$.AddNewFileWidget and .rqda$.AddNewFileWidget2
+ gmessage("Succeed.",con=T)
+ FileNamesUpdate()
+ }
+ )## end of save button
+ assign(".AddNewFileWidgetW",gtext(container=get(".AddNewFileWidget2",env=.rqda),font.attr=c(sizes="large")),env=.rqda)
+ textW <- get(".AddNewFileWidgetW",env=.rqda)
+ }
+}
+
## pop-up menu of add to case and F-cat from Files Tab
FileNamesWidgetMenu <- list()
+FileNamesWidgetMenu$"Add New File ..."$handler <- function(h, ...) {
+ if (is_projOpen(env = .rqda, conName = "qdacon", message = FALSE)) {
+ AddNewFileFun()
+ }
+ }
FileNamesWidgetMenu$"Add To Case ..."$handler <- function(h, ...) {
if (is_projOpen(env = .rqda, conName = "qdacon", message = FALSE)) {
AddFileToCaselinkage()
UpdateFileofCaseWidget()
}
}
-
FileNamesWidgetMenu$"Add To File Category ..."$handler <- function(h, ...) {
if (is_projOpen(env = .rqda, conName = "qdacon", message = FALSE)) {
AddToFileCategory()
@@ -203,3 +238,5 @@
FileNameWidgetUpdate(FileNamesWidget=.rqda$.fnames_rqda,FileId=GetFileId(condition="unconditional",type="all"))
}
}
+
+
Modified: www/ChangeLog.txt
===================================================================
--- www/ChangeLog.txt 2009-01-09 14:46:29 UTC (rev 58)
+++ www/ChangeLog.txt 2009-03-10 17:44:36 UTC (rev 59)
@@ -1,3 +1,9 @@
+2009-03-11
+ * New function of AddNewFileFun, add to popup menu of file Tab.
+
+2009-01-14
+ * Add citation file.
+
2009-01-09
* Add namespace
* RQDA-internal.rd is no loner needed (can be found in rev 57 or version 0.1-6)
Modified: www/documentation.html
===================================================================
--- www/documentation.html 2009-01-09 14:46:29 UTC (rev 58)
+++ www/documentation.html 2009-03-10 17:44:36 UTC (rev 59)
@@ -33,7 +33,7 @@
<p><b>0. Design principles </b>
<p>Reliability: This is the most important thing. In order to maximize the reliability, every change will write to the *.rqda file directly, so you don't have to manually save your project.
<p>Capacity of file management: This package is written for my own research, aiming at analyzing newspaper reports. In this case, there are lots of files, and I have put much effect on the management and organization of files (Sorting, Show coded files only, Show uncoded files only, Show those fit the searching criterion only etc.).
-<p>Mixed methods study: RQDA aims at mixed methods study. One example is the Cases Tab, which offers possibility of Qualitative Comparative Study (see <A target="_blank" HREF=http://code.google.com/p/asrr/>ASRR</a> or <A target="_blank" HREF=http://cran.r-project.org/web/packages/QCA/index.html>QCA</a> for more).
+<p>Mixed methods study: RQDA aims at mixed methods study. One example is the Cases Tab, which offers possibility of Qualitative Comparative Study (see <A target="_blank" HREF=http://asrr.r-forge.r-project.org/>ASRR</a> or <A target="_blank" HREF=http://cran.r-project.org/web/packages/QCA/index.html>QCA</a> for more).
<p><b>1. Project </b>
<p>You can create a new project in by clicking the new project button in Project Tab. RQDA will create a *.rqda file, which is a SQLite database. All the information (e.g. files, code list, all kinds of memo, coding, and relation between codes or between files etc.) is stored in that single file. Single *.rqda file makes backup or data migration much easier.
@@ -110,5 +110,6 @@
<br>A: Depends on the method of coding. For factual coding, you can do statisitcal analysis. If the documents are representative, you can do referential analysis; otherwise, you can only conduct descriptive analysis.
<br><B>Q:</B>Why should I use computer-aided QDA? Is it more efficient?
<br>A: CAQDA is time-consuming, but it makes the data analysis process more systematic, more tractable, and more transparent. It "forces" you to think hard about your data and the connection with theory (once you know the idea behind the CAQDA). Depending on the methodological paradigms, you may conduct Qualitative Comparative Analysis or examine some hypotheses (Not in the sense of statistical test of hypotheses) (See Kelle 1995 for details).
-
+<br><B>Q:</B> My Vista is English, but the *.rqda include Chinese, and it can not display correctly.
+<br>A: One possible reason is the font issue. You can uninstall GTK+. Launch R, set the locale to CHS by command Sys.setlocale(,"CHS"), load RGtk2 by command library(RGtk2), then R will ask if you want to install GTK+, install it. Then you can launch RQDA. It should work.
</Body>
\ No newline at end of file
Modified: www/index.html
===================================================================
--- www/index.html 2009-01-09 14:46:29 UTC (rev 58)
+++ www/index.html 2009-03-10 17:44:36 UTC (rev 59)
@@ -94,7 +94,7 @@
<li>The project summary page you can find <A HREF="http://r-forge.r-project.org/projects/rqda/">here</A>.
-<li>Homepage of <A HREF="http://ronggui.huang.googlepages.com/">the author</A>.
+<li>Homepage of <A HREF="http://asrr.r-forge.r-project.org/rghuang.html">the author</A>.
<li><A HREF="http://www.pressure.to/qda/">Weft QDA</A>, a similar project based on <A HREF="http://www.ruby-lang.org/en/">Ruby.</A>
More information about the Rqda-commits
mailing list