小编Sel*_*rac的帖子

我需要在MS SQL中进行以下转置

从:

Day  A  B 
---------
Mon  1  2
Tue  3  4
Wed  5  6
Thu  7  8
Fri  9  0

以下内容:

Value Mon Tue Wed Thu Fri 
--------------------------
A      1   3   5   7   9
B      2   4   6   8   0

我知道PIVOT当只有一列(A)时怎么做,但是当有多列要转置时我无法弄清楚怎么做(A,B,...)

要转置的示例代码:

select LEFT(datename(dw,datetime),3) as DateWeek, 
  sum(ACalls) as A, 
  Sum(BCalls) as B 
from DataTable
group by LEFT(datename(dw,datetime),3)

表结构:

Column DataType
DateTime Datetime
ACalls int
BCalls int

任何帮助都感激不尽.

我正在尝试在一台机器上配置分片，并且在尝试添加分片时不断收到错误消息。我使用以下网站作为参考：http : //www.javahotchocolate.com/notes/mongodb-sharding.html

我正在使用一台机器并使用不同的端口来模拟不同的 IP。

我有如下配置：

副本集成员：

mongod --dbpath \rs1_p\db --port 27017 --replSet rs1
mongod --dbpath \rs1_s1\db --port 27018 --replSet rs1
mongod --dbpath \rs1_s2\db --port 27019 --replSet rs1
mongod --dbpath \rs1_p\db --port 47017 --replSet rs2
mongod --dbpath \rs1_s1\db --port 47018 --replSet rs2
mongod --dbpath \rs1_s2\db --port 47019 --replSet rs2

在 MongoDB shell 中配置副本集：

config =
{
    _id:"rs1",
    members:
    [
        { _id:0, host:"computerName:27017" },
        { _id:1, host:"computerName:27018" },
        { _id:2, host:"computerName:27019" }
    ]
}
rs.initiate( config )

config =
{ …

我正在尝试使用多个条件筛选数据透视表.我检查了其他帖子,但运行时收到错误"Range类的AutoFiler方法失败":

Range("g41").Select
Selection.AutoFilter field:=1, Criteria1:=Array( _
    "101", "103"), Operator:=xlFilterValues

以下工作,但有相当多的项目来过滤true/false

With ActiveSheet.PivotTables("PivotTable3").PivotFields("Value")
    .PivotItems("101").Visible = True
    .PivotItems("103").Visible = True
    .PivotItems("105").Visible = False
End With

有更有效的方法吗？

我正在尝试获取具有最大值的文档列表。如果我知道具有最大值的文档数，我可以指定它（就像在另一个 stackoverflow 解决方案“mongodb 如何从集合中获取最大值”中的解决方案中一样），但如果我不知道该怎么做，我可以指定它不知道文档的数量是多少。

例如，使用以下文件：

{name:"a", age:10}
{name:"b", age:11}
{name:"d", age:12}
{name:"c", age:12}

所以我知道有 2 个文档的最大年龄为 12。因此我可以编写以下查询

db.collection.find().sort({age: -1).limit(2)

我使用limit(2)是因为我知道有 2 个文档具有最大值，但是我该如何自动化呢？我可以计算具有最大值的记录，将其存储在一个变量中并像这样使用它limit(n)吗？有没有其他方法可以做到？

我需要计算变量计数的百分比并将其放入向量中

我有一个框架如下：

group <- c('A','A','A','B','B','B')
hight <- c('tall','tall','short','tall','short','short')

group    hight
A        tall
A        tall
A        short
B        tall
B        short
B        short

如果运行表（df）我得到：

     hight
group short tall
A     1    2
B     2    1

计算百分比

t=table(df)
percentages <- data.frame(group=c('A','B'), percent = c(t[1]/(t[1]+t[2]),t[3]/(t[3]+t[4])))
percentages
percent.vector <- c(t[1]/(t[1]+t[2]),t[3]/(t[3]+t[4]))
percent.vector

我得到了我想要的：

    group   percent
1     A 0.3333333
2     B 0.6666667

[1] 0.3333333 0.6666667

...但我想有更好的方法来做到这一点。我无法对更大范围的组进行此计算。

如何简化百分比的计算？

谢谢

我需要根据数值高于或低于 10 将一列从数字更改为因子。

例如使用以下数据：

age <- c(1:20)
hight <- c(1:20)
d.frame <- data.frame(age, hight)

我尝试了以下方法：

d.frame$hight <- factor(d.frame$hight, levels( 1:9, 10:max(d.frame$hight) ), labels=c('low','high'))

和

d.frame$hight <- factor(d.frame$hight, levels( <10, >=10) ), labels=c('low','high'))

但是不要工作。

现在有什么想法可以进行这种类型转换吗？

谢谢

我有一个代码来提取R中的推文,但纬度经度显示为NA.我正在使用的代码如下:

tweets <- searchTwitter('weather', n=10,lang='en')
t <- twListToDF(tweets)
l <- t[, c("latitude", "longitude")]

l的输出如下:

          latitude longitude
1        NA        NA
2        NA        NA
3        NA        NA
4        NA        NA
5        NA        NA
6        NA        NA
7        NA        NA
8        NA        NA
9        NA        NA
10       NA        NA

如您所见,输出始终为NA.有关如何获取地理位置的任何想法？

我在 GridView 中添加带有按钮的列时遇到问题。

正如您从下面的代码中看到的，GridView 的数据源是 DataTable。我需要使用按钮向表中添加一个附加列。

从下面的代码中，我收到一条错误消息：

“System.Windows.Forms.DataGridViewButtonColumn”类型的值无法转换为“System.Web.UI.WebControls.DataControlField”。

    Dim dt_AllGroupsSetUp2 As New DataTable()
    dt_AllGroupsSetUp2.Columns.Add("Name", Type.GetType("System.String"))
    dt_AllGroupsSetUp2.Columns.Add("Age", Type.GetType("System.String"))
    dt_AllGroupsSetUp2.Columns.Add("Hight", Type.GetType("System.String"))

    For i As Integer = 0 To 7
        dt_AllGroupsSetUp2.Rows.Add()
        dt_AllGroupsSetUp2.Rows(i)(0) = "John"
        dt_AllGroupsSetUp2.Rows(i)(1) = 10
        dt_AllGroupsSetUp2.Rows(i)(2) = 70
    Next

    GV_DataByGroupAct.DataSource = dt_AllGroupsSetUp2
    Dim buttonColumn As New DataGridViewButtonColumn
    buttonColumn.Name = "Button"
    GV_DataByGroupAct.Columns.Add(buttonColumn)
    GV_DataByGroupAct.DataBind()

我也尝试了以下方法，但返回了以下错误：“New”不能用于声明为“MustInherit”的类。

    GV_DataByGroupAct.DataSource = dt_AllGroupsSetUp2
    Dim buttonColumn As New DataControlField
    GV_DataByGroupAct.Columns.Add(buttonColumn)
    GV_DataByGroupAct.DataBind()

有任何想法吗？

谢谢

我正在尝试粘贴我之前复制的一些值,但是我正在丢失数据,因为我事先正在清理目标单元格.

这是代码的示例:

Range("A1:B3").Select
Selection.Copy
Range("C1:D3").Select
Selection.ClearContents 'At this point the clipboard is cleared
Range("C1").Select
ActiveSheet.Paste 'I get an error here as the clipboard has been cleared

考虑到我不能先清除内容,有没有办法存储Range("A1:B3")的内容,以便我以后可以粘贴它？

我在templateField中有一个带有textBox的gridView.如果行中标记了一个复选框,我想提取textBox的文本.

我有如下定义的gridView

    <asp:GridView ID="GV_Comments" runat="server" AutoGenerateColumns="False" DataKeyNames="id"
        DataSourceID="SQL_Comments">
        <Columns>
            <asp:TemplateField>
                <ItemTemplate>
                    <asp:CheckBox runat="server" ID="Comment_Select" />
                </ItemTemplate>
            </asp:TemplateField>
            <asp:BoundField DataField="ID" HeaderText="ID" ReadOnly="True" SortExpression="ID" />
            <asp:TemplateField HeaderText="comment" SortExpression="comment">
                <ItemTemplate>
                    <asp:Label ID="Label1" runat="server" Text='<%# Bind("comment") %>'></asp:Label>
                </ItemTemplate>
                <EditItemTemplate>
                    <asp:TextBox ID="CommentForPeriod" runat="server" Text='<%# Bind("comment") %>'></asp:TextBox>
                </EditItemTemplate>
            </asp:TemplateField>
        </Columns>
    </asp:GridView> 
    <asp:Button ID="B_Load" runat="server" Text="Transfer Selection" onclick="B_Load_Click" />
    <br />
    <asp:TextBox ID="CompiledText" runat="server" Width="662px" Rows="10" 
        TextMode="MultiLine"></asp:TextBox>

代码如下

Protected Sub B_Load_Click(ByVal sender As Object, ByVal e As EventArgs) '(sender As Object, e As System.EventArgs) Handles B_Load.Click
    Dim …

我试图根据动态范围将负值更改为正值.动态我的意思是行号可能会改变.

例如

rowStart = 10
rowEnd   = 20

从这些我需要将此范围内的值更改为正数.我正在尝试以下但我收到一个错误:

Range("K" & rowStart & ":K" & rowEnd).Value = _
    Abs(Range("K" & rowStart & ":K" & rowEnd).Value)

我得到的错误是:运行时错误'13':类型不匹配

关于如何使这项工作的任何想法？

I have an Excel file with a macro that filters records. After running the macro I save and close the file. Once I open the file again it says that the file has been corrupted:

Excel found unreadable content in '[filename].xls'.
Do you want to recover the contents of this workbook?
If you trust the source of this workbook, click Yes.

Once I click Yes the file opens and looking at the XML file that directs me to I find …

我需要从包含格式为 mm/dd/yyyy 的日期的应用程序粘贴数据。当我将数据粘贴到 Excel 中时，日期被识别为 dd/mm/yyyy，而月份被错误识别的日期 (mm > 12) 将转换为文本。请参阅下面的示例图片

如何粘贴数据以直接将日期格式从 mm/dd/yyyy 转换为 dd/mm/yyyy？我尝试将列格式设置为日期 dd/mm/yyyy，但没有任何区别。