我需要简单地计算一张纸上的区域数量.我的代码是:
Sub areas()
Dim i As Long
i = Worksheets("Sheet2").Selection.Areas.Count
MsgBox i
End Sub
Run Code Online (Sandbox Code Playgroud)
但由于某种原因,我收到错误消息"对象不支持此属性或方法".我不知道为什么.此代码基本上只是从Microsoft网站复制而来.
我甚至无法立即打印出该Worksheets("Sheet2").Selection.Areas.Count部分的窗口.
有什么快速帮助?我正在使用Excel 2010.
谢谢.
以下代码是我的Shiny ui:
library(shiny)
shinyUI(fluidPage(
titlePanel("All Country Spend"),
sidebarLayout(
sidebarPanel( selectInput("split",
label = "Choose Fill For the Chart",
choices = c("Action.Obligation","Action_Absolute_Value"),
selected = "Action.Obligation"
)
),
mainPanel(plotOutput("SpendChart"))
)
))
Run Code Online (Sandbox Code Playgroud)
以下是服务器代码:
library(shiny)
library(ggplot2)
shinyServer(function(input, output) {
spend <- read.csv("data/Ctrdata.csv")
output$SpendChart <- renderPlot({
Country <- spend$Principal.Place.of.Performance.Country.Name
ggplot(spend, aes(x = Country, y = input$split)) + geom_bar(stat = "identity")
})
})
Run Code Online (Sandbox Code Playgroud)
每次运行它我都会收到以下错误:
"eval中的错误(expr,envir,enclos):找不到对象'input'"
我试图渲染一个简单的条形图,它将在每个国家/地区的合同支出的净值和绝对值之间切换,但它不会从selectInput框中识别出名为"拆分"的输入.
这是我的数据框的示例:
data.frame(Country = c("Turk", "Turk", "Saudi", "Saudi", "Ger", "Ger"),
Action.Obligation = c(120,-345,565,-454, 343,-565),
Action_Absolute_Value = c(120,345,565,454,343,565))
Run Code Online (Sandbox Code Playgroud) 我正在尝试使用 pymongo 根据 MongoDB 中的两个条件进行简单查询。
我正在使用教程文档中的示例餐厅数据集。我有:
from pymongo import MongoClient
import pymongo
import pandas as pd
client = MongoClient()
db = client.test
cursor = db.restaurants.find({"$and":[{'borough':"Manhattan"},{"grades":{'grade':"A"}}]}
for record in cursor:
print record
Run Code Online (Sandbox Code Playgroud)
我只是想打印曼哈顿所有等级为“B”的餐厅。但这没有任何结果。我也尝试过
cursor = db.restaurants.find({"borough":"Manhattan", "grades.grade":"B"})
Run Code Online (Sandbox Code Playgroud)
但这只会按第一个条件进行过滤,而不会按“等级”进行过滤。这正是文档中的布局方式,但我无法让它工作。
我刚在Mac上安装MySQL,但在我的机器上找不到usr / local / mysql。我进入主目录,但是当我键入cd usr时我看不到它,也无法确定是否安装了MySQL。
我如何找到安装?
我在数据框中有一列数据
Ozone Solar.R Wind Temp Month Day
41 190 7.4 67 5 1
36 118 8 72 5 2
12 149 12.6 74 5 3
18 313 11.5 62 5 4
NA NA 14.3 56 5 5
28 NA 14.9 66 5 6
23 299 8.6 65 5 7
19 99 13.8 59 5 8
8 19 20.1 61 5 9
NA 194 8.6 69 5 10
7 NA 6.9 74 5 11
16 256 9.7 69 5 12
11 …Run Code Online (Sandbox Code Playgroud) 我有以下数据框。它详细说明了4种不同支出方案的年成本,每种方案为三年。
mydf2 = data.frame( Scenario = c(1,1,1,2,2,2,3,3,3,4,4,4), Year= c(1,2,3,1,2,3,1,2,3,1,2,3),
Cost = c(140,445,847,948,847,143,554,30,44,554,89,45))
Run Code Online (Sandbox Code Playgroud)
我希望能够绘制出我所拥有的所有方案的年度总成本:
library(ggplot2)
ggplot(mydf2, aes(x = Year, y= Cost))+ geom_line(stat="identity")
Run Code Online (Sandbox Code Playgroud)
但它会产生以下可怕的图形:

当我按年份汇总数据时,它可以工作,但是我不知道如何在R中执行此操作。我必须回到Excel。如何按年份汇总数据框架,以便将其制成图表?新框架将如下所示:
Year Total Cost
1 2196
2 1411
3 1079
Run Code Online (Sandbox Code Playgroud)
但是我必须再次回到Excel来执行此操作。我也不知道为什么这些垂直线仍然存在。我是R的新手,非常感谢。
我正在尝试创建一个 lambda 函数,它将访问上传到 s3 的 pdf 表单,并删除输入到表单中的数据并将其发送到其他地方。
当我可以在本地下载文件时,我就可以执行此操作。因此,下面的脚本可以工作并允许我将 pdf 中的数据读取到我的 pandas 数据框中:
import PyPDF2 as pypdf
import pandas as pd
s3 = boto3.resource('s3')
s3.meta.client.download_file(bucket_name, asset_key, './target.pdf')
pdfobject = open("./target.pdf", 'rb')
pdf = pypdf.PdfFileReader(pdfobject)
data = pdf.getFormTextFields()
pdf_df = pd.DataFrame(data, columns=get_cols(data), index=[0])
Run Code Online (Sandbox Code Playgroud)
但是使用 lambda 我无法在本地保存文件,因为我收到“只读文件系统”错误。
我尝试使用 s3.get_object() 方法,如下所示:
s3_response_object= s3.get_object(
Bucket='pdf-forms-bucket',
Key='target.pdf',
)
pdf_bytes = s3_response_object['Body'].read()
Run Code Online (Sandbox Code Playgroud)
但我不知道如何将生成的字节转换为可以用 PyDF2 解析的对象。我需要的输出以及 PyDF2 将产生的输出如下所示:
{'form1[0].#subform[0].nameandmail[0]': 'Burt Lancaster',
'form1[0].#subform[0].mailaddress[0]': '675 Creighton Ave, Washington DC',
'form1[0].#subform[0].Principal[0]': 'David St. Hubbins',
'Principal[1]': None,
'form1[0].#subform[0].Principal[2]': 'Bart Simpson',
'Principal[3]': None} …Run Code Online (Sandbox Code Playgroud) 我有两个合同清单一个已经过去的结束日期.每次更新或扩展结束日期时,都会在原始表中创建新记录.另一个只有合同号和产品说明.第一个看起来像这样:
Contract End Date
AAA001 12/01/2013
AAA001 12/30/2013
BBB002 01/01/2014
BBB002 01/30/2014
Run Code Online (Sandbox Code Playgroud)
您可以看到,对于每个合同,结束日期都已更新.
Contract Product
AAA001 Apples
AAA001 Apples
BBB002 Oranges
BBB002 Oranges
Run Code Online (Sandbox Code Playgroud)
我需要一个查询,它将生成一个这样的表,其中只返回最大日期值.
Contract Product End Date
AAA001 Apples 12/30/2013
BBB002 Oranges 01/30/2014
Run Code Online (Sandbox Code Playgroud)
是否可以使用Mas ... In语句?我正在使用Access 2010.
我有以下代码:
DECLARE
f_cd fee.fee_cd%type;
f_name fee.fee_nm%type;
f_new_cd fee.new_fee_cd%type;
f_new_name fee.new_fee_nm%type;
Cursor cur is
SELECT Fee_cd, fee_nm, new_fee_cd, new_fee_nm FROM Fee;
BEGIN
if cur%ISOPEN then
close cur;
end if;
open cur;
for rec in cur loop
fetch cur INTO f_cd, f_name, f_new_cd, f_new_name;
dbms_output.put_line ('The Fee Code ' || f_cd
|| ' is the one you selected and it''s name is '
|| f_name);
end loop;
close cur;
END;
Run Code Online (Sandbox Code Playgroud)
但我一直收到错误信息
原因: 尝试打开已打开的游标.
操作: 在重新打开之前先关闭光标.
我不知道发生了什么.当我改变代码以取消它for loop并使用loop... end loop …